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Réduisez 

vos factures 

PTT au minimum 
(jusqu'à plus de la 
moitié du coût 


& minitel) 
TRANSFORMEZ 
VOTRE PCW EN 
SUPER MINITEL 


AVEC LE LOGICIEL 
EMULATEUR MYNEA** 





D ** Logiciel transformant un ordinateur AMSTRAD PCW en minitel intelligent avec 
Qù émulation complète du minitel (clavier/écran), mémorisation rapide des pages reçues, 

sauvegarde sur disquettes, procédure de connexions automatiques, impression des 
pages sur l'imprimante du PCW, étiquetage automatique des adresses de l'annuaire 
ei électronique, extraction d'informations par masques avec sauvegarde en ASCII pour 


une compatibilité totale avec vos programmes habituels. 


LÀ € | = l’émulateur de minitel sur PCW 


SYNEA et MYNEA sont distribués en exclusivité par DDI. (1) 48 67 28 44 
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Sur le thème « Jetez vos vieilles 
machines par la fenêtre » 
AMSTRAD 3 fait une 

formidable campagne de 
publicité sur TF1. Budget 
250 Millions de centimes pour 
nous prouver que notre PCW est vraiment une star. 
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NEWS 


PANIQUE A BORD... 


Arrivant de toute part, les jeux 
envahissent notre PCW à un point à 
peine croyable. La raison est simple et 
mérite d’être connue. Le phénomène est 
typiquement British. Premièrement les 
rumeurs indiquent que près de 200.000 
PCW sont en circulation sur cette île 
incroyable, deuxièmement, les acheteurs 
ont cru que le PCW était un CPC 
amélioré. Donc, espérant la compatibilité 
avec la gamme phénoménale de jeux qui 
font la fortune des boutiquiers (et l’on 
sait depuis Napoléon, que l’Angleterre 
n’en manque pas !), les anglais n’ont pas 
résisté à l’attrait d’une machine profes- 
sionnelle. Une fois déballée, cris et pleurs 
n’y changèrent rien, le PCW ignorait 
sans complexe les disquettes de ses 
ancètres… 


Allaient-ils être condamnés à jouer du 
Format de page en pensant à PAC 
MAN ? Négatif devaient répondre les 
éditeurs qui sentirent l'opportunité 
d’adapter consciencieusement les best- 
sellers d’hier aux espoirs d’aujourd’hui. 


Coup d’envoi par CP SOFTWARE avec 
3D CLOCK CHESS... Un tabac, des 
dizaines de milliers d'unités vendues dont 
une grande part en France... Les 
confrères médusés ripostent sans 
attendre. Angleterre d’abord avec 
SPACE INVADERS, TOMAHAWK & 
BATMAN, la France suit, pépère, menée 
par COBRASOFT avec OTHELLO, 
DAME et HISTOIRE D'OR. 


Le coup d’envoi est donné les joueurs 
s'affrontent et les ventes s’essoufflent… 


Le PCW aime le jeu mais de façon 
raisonnable et chaque nouveau titre fait 
un score un peu plus faible que le 
précédent en pensant secrêtement à 
rejoindre 3D CLOCK CHESS. 
Pensez-vous qu’une telle situation fasse 
tomber les bras de nos ardents 
protagonistes ? Pas question, l’adapta- 
tion coûte peu chère car les frais de 
créations, de packaging et de promotion 
ont été couverts par les machines 
précédentes donc ce n’est que du plus. 
Mais mieux encore, le PCW bénéficie 
d’une excellente résolution et l’écran BIT 
MAP permet un affichage extrèmement 
rapide, alors pourquoi ne se vendrait-il 
pas comme une machine de jeu ? 
Consciente ou non, cette démarche 
réjouit les utilisateurs et particulièrement 
AMSTRAD qui vantant les mérites de sa 
qualité courrier voit son bébé se 
transformer en une bête à jouer. 


GUARDIAN et BLAGGER 


Gu 






. Al11igata à 






Que demander de mieux ? Le délire 
ludique nous prend, encouragé sans 
vergogne par les meilleurs éditeurs, les 
titres déferlent et nous avec... 


LORICIEL avec BOB WINNER 
RAINBIRD 
avec STARGLIDER et THE PAWN 
ALLIGATA 
avec GUARDIAN et BLAGGER 
ELITE 
avec FRANCK BRUNO'S BOXING 
GENUS 
avec TRIVIAL PURSUIT 
FLEET STREET 
avec STRIKE FORCE HARRIER 
ETC, ETC, ETC... 


La liste augmente de jour en jour et 
passer chaque titre en revue en un 
numéro serait un tour de force qu’on 
laisse à d’autres... Mais commençons 
gentiment : 


d'ALLIGATA 


Livrés sur la même disquette, ces deux 
jeux sont halucinants. Rapides et 
prenants ils sont d’excellents remake des 
jeux de cafés qui ont fait le bonheur de 
plus d’un exploitant... Le premier, 
GUARDIAN, est un vaisseau que vous 
commandez au clavier ou au joystick 


* dans le but d'empêcher une escouade de 


vilains vaisseaux ennemis d’enlever vos 
troupes au sol. C’est très dur mais 
vraiment marrant. L’autre jeu, 


A BLAGGER est un petit bonhomme qui 


saute et qui court pour aller on ne sait 
où. Toujours est-il qu’il doit éviter des 
pièges franchement ignobles. Du délire. 


En résumé, la meilleure affaire du moment à posséder ABSOLUMENT ! 


Distribué par DDI 


sifguersninnenennn Jesse SNOOKER de CDS 


Plus reposant et plus stratégique que le pack précédent SNOOKER n’en est pas 


PR A] moins très agréable. Totalement graphique, il propose les trois jeux de billard les 
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En résumé, une valeur sûre ! 
Distribué par D.D.I. 


HEATHROW et SOUTHERN BELLE de HEWSON 


Si vous aimez les avions, les maths et les casses-tête, ce jeu est 
fait pour vous. Aux commandes de la tour de contrôle de 
l’aéroport le plus intense du monde vous allez devoir superviser 
le trafic des p’tits Jumbo en tentant d’éviter les crashs honteux 
qui risqueraient de nuire à votre image de marque. Ce jeu est 
complexe et exige une attention soutenue ainsi que l’absortion 
intégrale d’un manuel conséquent qui, encore en anglais, est 
aux dires d'HEWSON en cours de traduction. 

Le second jeu est beaucoup plus simple et néanmoins 
passionnant, Maître de la chaudière, il faut emmener la BELLE 
SUDISTE de VICTORIA à BRIGHTON sans gâcher charbon 
et eau indispensables à la propulsion. Simulation extèmement 
réaliste au point que l’horloge vous signale l’heure du départ 
et qu’un message vous prie de ne pas trop faire de fumée en 
gare ! Comment pourriez-vous y résister ? 

En résumé, si HEATHROW demande une belle logique et une 
patiente peu commune, SOUTHERN BELLE est à la portée 
de tous et font de ce pack un excellent investissement. 


Distribué par U.B.I. SOFT 
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plus répandus. Le POOL (billard américain) avec ses 15 boules de couleurs, le 
SNOOKER (billard anglais) avec 15 boules rouges et 7 de couleurs qui, BBC à 
l'appui, fait les honneurs de championnats effrénés en Angleterre (même les enfants 
ont leur championnat national ou on les voit habillés en smocking, comme les grands. 
Adorable !) et l’indispensable billard français plus économe avec trois boules. 


Les coups sont simples et restituent avec réalisme le véritable billard. D’abord la 
direction de la boule, ensuite la force de frappe, enfin l’angle d’attaque du coup 
sur la boule. On peut ainsi donner de l’effet comme sur les vrais. 


SOUTHERN BELLE HENSON 


Initiation à DBASE II 
5e partie 


PEUT-ON CALCULER AVEC DBASE ? 
PREMIERE FAÇON DE CALCULER 


À cette passionnante question, nous répondrons sans 
hésiter : oui ! Le lecteur attentif aura déjà remarqué, lors 
des épisodes précédents, qu'il est très facile de calculer 
avec DBASEII des totaux et autres sous-totaux, 
notamment en usant de REPORT FORM ; mais on peut, 
en mode direct, faire des opérations, évidemment 
quelque peu limitées, par rapport à MULTIPLAN, par 
exemple. Pour ce faire, on peut utiliser la commande 
SUM, qui permet, comme son nom l'indique, de faire la 
somme d'une série de nombres. Si l'on reprend l'exemple 
du splendide fichier CLIENTS qui nous sert depuis le 
début de cette série d'articles, nous savons qu'il exsite 
un champ de données numériques nommé COMPTE : 


NOM ADRESSE CODE VILLE COMPTE 
Bihan 12 allée des prunes 08200 Sedan 12000,00 
Dupont 1 rue des oranges 08000 Charleville 12450,00 
Parazé 3 rue du baron 08000 Charleville  1234,34 
Calin 4 tour diamant 08200 Sedan 12,56 
Bihan 5 rue des lilas 08200 Sedan 300,00 
Bihan 45 allée des poires 75000 Paris 0,00 
Dupont 23 bd des pommiers 75006 Paris 45,60 
Parazé 44 rue des cerises 08200 Sedan 222,55 


Etant numériques, on peut donc faire le total de tous les 
champs COMPTE du fichier de la manière suivante : 


SUM COMPTE 


et le système renvoie : 
26265.05 


Il va sans dire que si le fichier comporte plusieurs champs 
numériques, il reste possible de connaître la somme de 
chacun de ces champs (maximum 5). Si le fichier est, 
par exemple, constitué de la façon suivante : 


NOM ADRESSE CODE VILLE COMPTE VALEUR 
Bihan 12 allée des prunes 08200 Sedan 12000,00 45,000 
Dupont 1 rue des oranges 08000 Charleville 12450,00 57,560 
Parazé  3rue du baron 08000 Charleville  1234,34 90,600 
Calin 4 tour diamant 08200 Sedan 12,56 267,550 
Bihan 5 rue des lilas 08200 Sedan 300,00 345,000 
Bihan 45 allée des poires 75000 Paris 0,00 1279,340 
Dupont 23 bd des pommiers 75006 Paris 45,60 0,000 
Parazé 44 rue des cerises 08200 Sedan 222,55 0,000 


Nous avons ici deux champs numériques ; pour en 
connaître le total, il nous suffit de faire : 


SUM COMPTE,VALEUR 
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et nous obtenons : 
26265.05 2085.050 
ce qui est bien la somme de COMPTE et de VALEUR. 


On peut bien sûr poser de telles questions en les faisant 
porter sur des critères particuliers. Par exemple, pour 
obtenir le montant de COMPTE et de VALEUR pour 
l'individu nommé ‘BIHAN’, on demandera ainsi : 


SUM COMPTE,VALEUR FOR ! (NOM) = « BIHAN » 


pour obtenir : 
12300,00 390,000 


On peut stocker la ou les valeurs ainsi calculées dans des 
variables exactement comme dans un langage de 
programmation (ce qu'est Dbase, par ailleurs), comme 
ceci : 

SUM COMPTE TO COMP 


Pour rappeler ultérieurement le total du champ COMPTE 
sans pour autant refaire le calcul, il suffit de rappeler la 
valeur contenue dans COMP, avec : 

? COMP 

qui signifie, en bon BASIC : 


PRINT COMP, c'est-à-dire : 
AFFICHE LA VALEUR DE LA VARIABLE COMP. 


On note qu'il est ainsi possible de stocker en mémoire 
toutes les valeurs imaginables ; pour les relire, il suffit de 
demander la liste de la mémoire de la manière suivante : 


LIST MEMORY 
qui renvoie, en l'occurrence : 
COMP (N) 26265.05 


Si plusieurs variables existaient, elles seraient toutes 
affichées, avec un N ou un C pour Numérique ou 
Caractère : mais on en reparlera plus tard. 


SECONDE FAÇON DE CALCULER 


On peut utiliser une autre commande, TOTAL, pour faire 
des... totaux (Etonnez-moi, Benoit), mais également des 
sous-totaux, comme avec la commande REPORT FORM. 
Pour cela, il nous faut au préalable créer un fichier qui 
recevra les sous-totaux en question (sinon le nouveau 
fichier sera quand même créé, mais sur le modèle de celui 
qui est actuellement en mémoire). Par exemple : 


On crée le fichier qui reçoit les totaux : 
CREATE FICHIER 
DONNEZ LA STRUCTURE DE L'ENREGISTREMENT SELON LE FORMAT 


CHAMP NOM,TYPE,DIMENSION,DECIMALE(S) 
001 NOM,C,15 
002 COMPTE,N,8,2, 


On vient donc de créer un fichier nommé FICHIER 
composé de deux champs, nécessairement de même 
longueur que le fichier d'origine. 


DBASE Il : 5e EPISODE 


Puis on crée un fichier index ou un fichier trié (c'est 
‘obligatoire) sur un champ qui sert de critère, ici le nom 
par exemple, sur le fichier CLIENTS : 

USE CLIENTS 

INDEX ON NOM TO FICNOM 


Ensuite, on indique au système que l'on va faire des 
opérations sur le fichier indexé : 


USE CLIENTS INDEX FICNOM 


Pourquoi toutes ces opérations ? En fait, il faut bien 
indiquer au système sur quoi portent les sous-totaux, et 
le tri permet de mettre ensemble, par « paquets », tous 
les « Dupont », « Parazé » et autres « Bihan » de la 
base de données : 9n récapitule donc toutes les valeurs 
COMPTE sur le critère du nom. 


Il suffit alors de faire : 

TOTAL ON NOM TO FICHIER 

et le système indique : 

00004 ENREGISTREMENT(S) TRANSFERE(S) 


Le fichier qui reçoit les totaux étant créé, nous entrons 
alors : 


USE FICHIER 

puis 

LIST 

pour le lire, et l'écran affiche : 
00001 Bihan 12300,00. 
00002 Calin 12,56 
00003 Dupont  12495,60 
00004 Parazé 1456,89 


‘À quoi tout cela peut-il servir ? En fait, nous avons voulu 


tous les sous-totaux calculés sur des noms identiques : 


tous les « Bihan » de la base de fait représentent 12300 
francs, tous les « Dupont » 12495,60 etc. Ainsi, nous 
pouvons maintenant calculer tous les sous-totaux 
possibles (en fonction de n'importe quel critère), le total 
et garder le tout en mémoire dans un fichier. Ce dernier 
sera composé, comme dans l'exemple, des noms 
différents du fichier (et non pas tous les noms) et du total 
correspondant à ce critère. 


{A noter : avec SUM, les enregistrements notés « # », 
c'est-à-dire en instance d'effacement, ne seront pas pris 
en compte par le calcul du total, alors que cela n'est pas 
le cas avec la commande TOTAL). 


APPRENONS A COMPTER 


Si nous pouvons calculer avec Dbase sur les champs 
repérés sous forme de colonnes de nombres, on peut 
également compter les champs en question avec la 
commande COUNT. Elle s'utilise très simplement : 


COUNT 

renvoie le nombre d'enregistements du fichier, 
% x x x COMPTEUR = 00008 

ou bien : 

COUNT FOR ! (nom) =« DUPONT » 

renvoie le nombre d'enregistrements dont le champ NOM 
est égal à DUPONT : 

% x x COMPTEUR = 00002 

ou bien encore : 

COUNT FOR COMPTE » 12000 

% x x COMPTEUR = 00002 

ou alors : 


COUNT FOR ‘z' $ NOM 
% x x COMPTEUR = 00002 
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Là aussi, nous pouvons stocker en mémoire le nombre 
trouvé : 
COUNT FOR COMPTE > 2 TO NOMBRE 


On peut alors compter séparément : 

COUNT FOR (ville) ='’SEDAN'" to A 

% x x COMPTEUR = 00004 

COUNT FOR (ville) ='*CHARLEVILLE’" TO B 
%x x x COMPTEUR = 00002 

COUNT FOR l{{ville) = ‘PARIS’ TO C 

%x x x COMPTEUR = 00002 


Puis récupérer le nombre total de personnes en faisant : 
COUNT tout simplement, 

ou bien : 

?2A+B+C 

8. 


FONCTIONS DIVERSES 


Pour se changer les idées, nous allons étudier maintenant 
quelques commandes de Dbase fort utiles et par ordre 
alphabétique, pour permettre une recherche ultérieure 
plus aisée. 


LE SIGNE ‘à’ 

Dans l'analyse d’une chaîne de caractères, le système 
peut renseigner sur un emplacement à l'intérieur d'une 
chaîne : 

? à(‘‘'EST'’, ‘PATRICE EST TRES SYMPATHIQUE"') 
renvoie : 

9. En effet, le mot ‘EST’ commence bien au neuvième 


caractère de la chaîne ‘‘PATRICE’"’" etc» (voir les 
fonctions STR et $. 

- DATE 

Pour connaître la date, il faut entrer : 

? DATE) 


On note qu'il n'y a pas d'arguments entre les 
parenthèses. Le système répond par la dernière date qui 
a été enregistrée, si l’on oublie de la mettre au début. 
On peut réactualiser en entrant la nouvelle date ainsi : 


SET DATE TO 12/01/87 


et non pas : 
SET DATE TO 12/01/1987 


ce qui aura pour effet de créer la date suivante : 
12/01/C5 


DBASE Il : 5e EPISODE 


lci, C5 est une valeur hexadécimale qui n'a rien à voir 
avec l'année | 


- LE DIESE, # 


Ce signe permet de savoir où se trouve le pointeur 
actuellement. On sait qu'il existe une mémoire (ou du 
moins on peut le deviner !) dans laquelle est stockée le 
numéro logique de l'enregistrement en cours. Pour le 
connaître, il suffit de faire : 

? # 


Rappelons que la commande GOTO suivie d'un numéro 
d’enregistement ou (GO n) permet de forcer ce pointeur 
sur ce numéro. On peut le constater ainsi : 

GOTO 5 

DISPLAY 

ou 

? # 


- LE DOLLAR, $ 


Cette fonction permet de retrouver, ainsi qu'on l'a déjà 
vu, une sous-chaîne de caractères dans une chaîne, par 
exemple comme ceci : 

LIST ALL FOR ‘‘’z'" $ NOM 


renverra tous les enregistrements dont le nom contient 
la lettre « z » (sauf l'initiale !). Mais le dollar sert 
également d'une façon un peu différente à extraire une 
sous-chaîne d'une chaîne de caractères de la façon 
suivante, comme la fonction MID$ du BASIC : 


? $(''AZERTYUIOP’',4,5) 

qui renvoie : 

RTYUI 

On note que la sous-chaîne renvoyée commence au 
quatrième caractère de la chaîne « AZERTYUIOP » et 


pour longueur 5 caractères : ces deux valeurs, 4 à 5 sont 
données comme arguments dans la question précédente. 


- EJECT 

Quand on se sert de REPORT FORM, il y a un saut de 
page de l'imprimante automatiquement programmé. Pour 
l'éviter, on entre : 

SET EJECT OFF 

la remise en l’état par défaut se fait évidemment avec : 
SET EJECT ON 


- HELP 

Au secours |! Cette commande est très utile pour ceux 
qui ne comprennent rien à cette magnifique série 
d'articles. En désespoir de cause, ils pourront toujours 
relire leur manuel ou mieux, utiliser la commande HELP. 
Ainsi, le meilleur moyen de le faire est d'entrer HELP suivi 
du terme incompris. Par exemple, si l'on ne comprend 
pas le mot TOTAL, on entre : 

HELP TOTAL 

et un texte explicatif s'affiche sur l'écran : dès lors, on 
n'a plus aucune excuse | 


- INT 


Extrait la valeur entière d’un nombre quelconque. Par 
exemple : 


? INT(5.889) 

renvoie 

5 (et non 6, comme dans certaines fonctions BASIC qui 
arrondissent). 

- LEN 


Cette fonction permet de connaître la longueur (length) 
d'une chaîne de caractères : 
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? LEN(« BONJOUR LES AMIS ») 
16 


- LE POINT-VIRGULE, ‘‘;"" 


Le point-virgule permet d'écrire une commande très 
longue, qui dépasserait éventuellement le nombre de 
colonnes de l'écran, et sert en fait à indiquer à Dbase 
qu'il faut lire la suite (de la question) à la ligne suivante. 


- QUIT 


On sait que pour sortir de DBASEI, une fois son travail 
effectué, il faut user de la commande QUIT (et non sortir 
en éteignant simplement l'ordinateur), ce qui a pour effet 
de refermer tous les fichiers ouverts. Mais on peut vouloir 
sortir de Dbase sans pour autant terminer le travail. Pour 
cela, on se servira de la commande QUIT un peu comme 
on le fait sous MS/DOS avec les commandes EXIT et 
SHELL. |! est possible de quitter dBASE momentanément 
pour effectuer des opérations diverses sous le DOS, 
c'est-à-dire le CP/M et revenir automatiquement sous 
Dbase. Pour ce faire, et à supposer que l'on veuille par 
exemple utiliser le BASIC, on entrera : 


QUIT TO « M:BASIC »,« DBASE » 


Dans cet exemple, le langage BASIC est supposé être 
en mémoire M. Lors de cette commande, Dbase crée 
sur disque un petit fichier qui est composé des 
commandes suivant TO. Ainsi, on peut comme ici quitter 
Dbase, utiliser le BASIC (ou le CP/M) puis retourner sous 
Dbase. Rappelons que pour sortir du BASIC il suffit 
d'entrer la commande 


SYSTEM 


Dès le retour à Dbase, le fichier créé (nommé $$$.SUB) 
disparaît du disque, lequel doit donc ne pas être protégé 
en écriture. 


- STR 

Cette fonction permet l'analyse d'expressions 
numériques (string = chaîne) : 

? STR(12345.678,5) 

12345 


Le résultat est renvoyé sous forme de chaînes de 
caractères ; ce n’est pas un nombre | 


- VAL 
Cette fonction convertit une chaîne de caractère en 
nombre (à supposer bien sûr que la chaîne est composée 
de caractères numériques), comme ceci : 
? VAL (12345) 
donne 
12345. lci, c'est un nombre qui est renvoyé, et non une 
chaîne. Par exemple, si l'on désire connaître les 
départements utilisés dans le champ CODE de notre 
fichier CLIENTS, on sait que les deux premiers caractères 
les symbolisent. Pour les extraire, on peut : 
- où utiliser : 

? $(CODE,1,2) 
- Où bien : 

? VAL(CODE)/1000 
Ce qui revient au même, à la différence près que dans 
le premier cas la valeur renvoyée est une chaîne de 
caractères alors que dans le second, c'est un nombre 
(voir STR). 


Bon courage | 


M Patrice BIHAN 


DBASE Il : 5e EPISODE 


LES 
LIVRES 


DE 
DBASE II 


LE MANUEL D'UTILISATION 
La Commande Electronique 
Fourni avec le programme. 


D'un rapport qualité/prix sans égal, c'est un gros 
livre de plus de 500 pages. 


On peut lui reprocher un certain manque d'ordre 
accentué par l'absence d'index général. 


Mais en cherchant bien, il est complet sans oublier 
l'utilitaire ZIP : ce programme livré avec la version 
AMSTRAD de DBASE II permet d'écrire des 
fichiers de commande à partir d'un écran d'entrée. 


De plus, la disquette présente 2 exemples 

d'application : 

- une gestion de stock qui est bien explicitée dans 
le livre. 

- une gestion de compte bancaire qui elle est sans 
commentaire dans le manuel (sa qualité est assez 
moyenne mais elle tourne et peut bien sûr servir 
de point de départ à une réalisation plus affinée). 


La combinaison d'un programme saisi sur disque 
avec son commentaire est un excellent moyen de 
progresser. 


INITIATION 


. DBASE II sur AMSTRAD 
par Claude DELANNOY chez EYROLLES 
1e" édition 1987 - PRIX : 130 F 


C'est le seul livre spécifiquement consacré au 
PCW. 


C'est le plus élémentaire de tous (ce qui n'est pas 
péjoratif du tout); pédagogie progressive avec 
exercices et corrigés. 

Aucune mauvaise surprise: c'est la version 
française 2.4 de la Commande Electronique qui est 
utilisée. 

Vous n'irez pas très boin en programmation mais 
toutes les commandes essentielles sont très bien 
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expliquées avec exercices et corrigés. On peut lui 
attribuer la palme pour le vrai débutant qui a peur 
de se plonger dans le manuel. 


Dans un souci de simplicité. l'utilisation du lecteur 
M n'est pas envisagée ni celle de l'utilitaire ZIP. 
Dommage. 

Ce livre sauvera ceux que l'absence de convivialité 
de DBASE inquiète. 


Livre quasiment indispensable. 


PARLEZ-VOUS DBASE II ? 
par René COHEN chez E.T.S.F. MICRO-SYSTEMES 


PRIX : 110F 
C'est aussi l’un des manuels les mieux rédigés. Il 
est très didactique, nécessite quelques 


connaissances au départ mais reflète l'expérience 
d'un excellent praticien de DBASE. 


C'est le livre de poche de DBASE. 


LA PRATIQUE DE DBASE II 
par Jean-Claude GUILLEMOT chez EYROLLES 
2e édition - PRIX : 150 F 


Ouvrage d'initiation d'une excellente tenue. Pas de 
prétentions démesurées mais tout est clair et les 
programmes présentés sont de vrais listings ce qui 
évite la greffe des fautes d'impression. 


DBASE II sans embûches 
par Ghéorghii GRIGORIEFF chez EYROLLES 
8° édition, revue et corrigée 1986 - PRIX : 123 F 


C'est un ouvrage de première initiation qui ne 
nécessite aucun prérequis. Simple, clair, il vous 
prend par la main du début à la fin. Un regret : La 
Commande Electronique qui diffuse DBASE II a 
francisé les messages d'erreurs à l'écran et même 
la dernière édition du livre laisse les messages en 
anglais. Il va plus loin que les précédents en 
développant et expliquant très bien un programme 
de gestion de livres. 


INTRODUCTION à DBASE II 
par Alain SIMPSON chez SYBEX 
PRIX : 148 F 


Il ne s'agit que d'un livre de plus dans cette série. 
Bien qu'il s'agisse d'une traduction, les messages 
d'erreurs sont en français. 


Cela semble le rare intérêt du livre. 


Celui-ci est conçu (en dehors d'un peusdo- 
graphique) autour d'un fichier d'adresses; les 
exemples sont imprécis ou comportent des fautes. 


Le livre est assez mal structuré dans son ensemble. 


Espoir déçu: de longs développements sur un 
programme d'impression d'étiquettes mais il 
néglige l'essentiel à savoir les réglages de 
l'imprimante en fonction du type d'étiquette ce qui 
est le problème majeur de ce type de travail. 


N.B. La loupe nécessaire pour lire les programmes 
n'est pas fournie. Cinq numéros de l'ECHO pour le 
même prix, c'est plus utile. 


LES LIVRES DE DBASEII 





DBASE en capsule 
(non, pas d'erreur comme le « couvercle » du soda) 
par Phililipe MANSEAU 
Edition de l’école polytechnique de MONTREAL 
diffusé par TEC et DOC 
2° édition revue et augmentée. 
PRIX : 67 F (soixante sept !) 


Petit manuel à but essentiellement d'enseignement. 
Il comporte sur la page de droite un bref descriptif 
d'une commande et sur la page de gauche les 
explications. 


Le tiers du manuel est consacré à DBASE III. 


Pratique, il se prête bien à l'utilisation d'un 
rétroprojecteur. 


Plutôt destiné aux formateurs. 


POUR ALLER PLUS LOIN 


ECRIRE EN DBASE 
par Colette MICHEL chez BCM diffusé par P.S.I. 
2e édition - PRIX : 185 F 


Ecrit pour DBASE II et III 


Il est plein de conseils de bon sens qui peuvent 
paraître simplistes mais qui sont fort judicieux. Très 
axés sur la convivialité. On échappe difficilement 
aux classiques programmes de gestion de stock, 
clients, etc. 


Les programmes proposés ne tournent pas toujours 
parfaitement ; il existe une disquette qui les reprend 
mais malheureusement pas au format AMSTRAD. 
Le tout est de bonne tenue. 


J'ai écrit il y a plusieurs mois à l'éditeur belge pour 
lui demander s'il comptait faire une disquette 3; 
j'attends toujours la réponse. En revanche je pense 
maintenant acheter l'une de celle proposée car j'ai 
trouvé quelqu'un pouvant me faire la conversion de 
format. À suivre. 


TOUTE LA PUISSANCE de DBASE II/DBASE III 
en un instant. 
par Ghéorghii GRIGORIEFF, chez EYROLLES 
PRIX : 123 F 


Composé un peu à la hâte avec un MACINTOSH, 
utilisant les codes CHR$ d'un SANYO pour les 
programmes (dont les codes CHR$ > 126 sont 
différents de l'AMSTRAD), le titre est plus 
prometteur que la substance. 


ll s’agit d'une liste de 45 recettes dont certaines sont 
excellentes. On reste un peu sur sa faim quand 
même. 


DBASE II - APPLICATIONS 
par Christophe STEHL chez SYBEX. 
PRIX : 148 F 


Titre prometteur mais que propose-t-il vraiment de 
plus que le manuel ? 
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Les programmes ne sont pas clairs ; il n'y a pas 
d'organigramme et on a parfois bien du mal à voir 
où l'on veut en venir. 


Lisibilité douteuse: pas de loupe pour les 
programmes et le 0 et le ÿ ne sont pas distingués. 


Au total pas de véritable APPLICATION pratique. 


LA BIBLE 


CLEFS pour DBASE II et III 
par Michel KELLER chez P.S.I. PRIX : 285 F 


Ce livre peut être considéré comme la bible des 
DBASE toutes versions confondues : cela réduit un 
peu son intérêt pour le PCW et il est assez cher. 


Néanmoins c'est une REFERENCE : le chapître 
« TRUCS ET COMMENT » est bien intéressant et 
c'est le seul manuel qui parle un peu de l'accès au 
langage machine. 


Conclusion : 


Il y a donc profusion d'ouvrages d'initiation mais un 
manque certain d'ouvrages d'applications solides. 
Le but de cet article est d'essayer de vous guider 
vers ceux qui vous rendront le plus service. 


Il n'existe pas d'équivalent pour DBASE II de 
l'excellente collection de CEDIC-NATHAN pour 
MULTIPLAN. 


Attention aussi, beaucoup de livres ont été écrits 
pour les nombreuses versions 2.3, 2.4, sous MS-DOS 
ou CP/M. Le logiciel a donc eu différents utilitaires 
d'aide ou d'installation (INSTALL, SED etc...) quine 
sont pas fournis avec votre version. 


B Francis DALIPHARD 


LES BONNES ADRESSES DE DBASE II 


E.T.S.F. 
2-12, rue de Bellevue, 75940 Paris cedex 19 
Tél. : 42 00 33 05 


EYROLLES 
61, bd Saint-Germain, 75240 Paris cede 05 
Tél. : (1) 46 34 21 99 


SYBEX 
6, imp. Curie, 75018 Paris, Tél. : (1) 42 03 95 95 


PSI 
BP 86, 77402 Lagny cedex, Tél. : 05 21 22 O1 


LA COMMANDE ELECTRONIQUE 
7, rue des Prias, 27920 St Pierre de Bailleul 
Tél. : 32 52 54 02 
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AUTELRrS 
SYLE LOLET 


INCROYABLE !!! 
L'ECHO DU PCW EST 
MAINTENANT EN VENTE 
DANS LES KIOSQUES 
DE FRANCE ! 


Incroyable... Je n’en reviens 
franchement pas. J'en parlais encore 
hier avec mon PCW qui ne pouvait 
s'empêcher de faire frissonner ses 
octets d’une joie peu commune. 


service sans aucun recours à la 
grâce présidentielle. 


Comme je suis bon, je vous donne 
les numéros de lignes qu'il faut 
rajouter suivies de l'instruction REM 
(exemple 22300 REM) : 


22300 - 22400 - 22400 - 22600 - 22900 & 23100. 


Maintenant qu’il ne peut plus 
s'asseoir, il jouera du LOCOSCRIPT 
debout, c'est peut-être un détail 
pour vous, mais pour moi ça veut 
dire beaucoup... (je remercie France 
Gall pour sa participation active à 


Si PAGES 


notre interaction du jour). 


L 


Cette feuille de choux de quelques 
grammes qu’on s'était fait comme un 
petit bonheur, pour voir, pour boire, 
pour rire et par plaisir allait, par la 


E 


S TEAM 


LOCO LOCO LOCO... 
Dr LOCO, bravo ! A l'inverse du 


F.CALI PHARE 8 5. 00MS80 
78 Fri 


OR LOCCT 
GERMAIN DELALANDE 


GERAMAIN DELALANDE 
MARE HEAMiICn 

G. PPOBSST 8 PF. HUBER 
MARC REF i On 
GERARE 


PATRICE BinAn 
ECO" 
OLIVIER COQQuif 


MARE EAN On 


ra-Oun-umm 


RATES 


HiSTt ORAMMES 


grâce et l'enthousiasme de ses 
lecteurs, franchir le seuil rutilant des 
échoppes de presse. 


22.000 Exemplaires pour vous, petits 
chanceux, directement dans les 
villes et les campagnes de la doulce 
Franche et massive (!) qui nous 
attend de pied ferme. Cela impose 
des efforts à tous : 


NOUS! Régularité, attention et 
innovation pour que l’Echo 
approche cette sublimale perfection 
à l’image de notre volonté. 


VOUS! Fidélité, participation et 
amitié pour prouver au monde 
entier que l’Echo peut être à l'image 
de son PCW : Parfait ! 


Voilà, j'ai toutes les chances d’être 
prochainement augmenté, merci de 
m'avoir lu jusqu'ici à moins que vous 
ne préfériez assister à nos tortures 


précédent vous pouvez être fier 
d’avoir été l'élu des lecteurs. Vous 
resterez un illustre exemple pour 
notre jeunesse qui, des siècles 
durant, récitera, le cœur en fête, 
Plus, plus, plus, il est plus tonton 
LOCO ». 


LES GÂTÉS DE L’ÉCHO... 


Saviez-vous qu'il existe en ce 
monde, une secte mystique dont les 
rangs grossissent chaque jour. On 
les nomme, les PCWistes heureux et 
leur cri de ralliement n’est autre que 
« Viva el cluba ! ». Avec leurs boîtes 
aux lettres personnelles sur minitel, 
ils nous envoient des petits 
messages et nous leur répondons 
tant que nous pouvons. Ils trouvent 
leurs prières dans un bulletin 


paroissien plein de bonnes astuces 
et sont accueillis avec amour et 
petits fours chez les meilleurs 
prêtres revendeurs qui leur 
accordent d’incroyables remises. 


Comme eux, communiez sans 
retenue sous la haute bienveillance 
du Père Huber(*) qui protègera vos 
PCW contre des sortilèges 
douteux... 


Le mien est maintenant baptisé du 
doux nom de JOICE (en français 
dans le texte) et affiche en latin. 
Merci le club! 


m8 ponton end 
nt 2 re ut nu eme 
6-88 p-p-me mm 

A a 6 une 8 ES 29 8e mn 
nn un 06 ---- t-on 
0404-92 ut nn u-0-m0- pm t-me 
pbm nn 

2 6 a a tr 8 3e a en dde sd vs 

20-08 08400 0-0 un nm nn 

A6 et pu ae Fe ot eut Eee 

OP LOCO 8 ARNAUD 8: SSOLUDFE 


coutumières.. 


NOTES 
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PAGES 





=] 


LES PLUS OE LOCOSER:I PT 


LES FOUETTÉS DU MOIS 


Il est chauve, petit et trapu. Vous 
pensiez qu'il avait des petites 
lunettes cerclées d’or et des yeux 
dans le vague... C'était faux! 
L'affreux Marc Hermion votre 
habituel chouchou (non je suis pas 
jaloux) s’est horriblement comporté 
en nous remettant le listing de 
GSXDAD de Gérard SIRHUGUES. Il 
avait subrepticement subtilisé 
quelques lignes qui gènaient la 
régularité des colonnes. Bilan: 
23423 Coups de fil, 12334 Procès en 
cours et 64503 dépressions 
nerveuses. Par conséquent, nous 
condamnons l’infortuné à subir 
1294938 rebonds de la badine de 


LA VOIX DU SEIGNEUR 


Branché 24H/24H notre saint père 
vous transmettra tout un lot de bons 
conseils : Nouveautés, adresses, 
sommaire de l’Echo, il sait tout! 
Pour le vérifier : (1) 48 67 62 25 et 
[CONNEXION /FIN] sur votre minitel 
sacré. 


Paix à vos âmes et à demain si vous 
le voulez bien !!! 


Ce] 


ARTIÈLES 
AÆE CSr 


GEST ON DE STOCh 
gagnants du mois... 


REPORTAGE SCANNER 


MOENNE GENERALE PPS 
HRRHHHHRRRHERRRRERRNRRRRANHHNNNRRHRRHERRRNERENERERRNRRRRNETHRNNRENNENNLHNNNUTERNULENNNNNAERENRANTANLUUULHUUULLHE 


LES PLUS DE CPAM 
LES PLUS D'E-BASIC 


DELIBE ASCII: 
LONDFES LA MOROSITE 


0.A.0. 
RÉHHRRRHRHHRERRRRRRRRNRRNEUENRRRERRENEUEURRERETHRRHRRRRRANNHRENNNUNRENREUELERNUHRNNRRNRANANUNENANUULUULLAURHRHNUUN 


INITIATION À OBASE(S)] 


SPOCOL CBANC O'ESSAI)] 
ODEMARRER AÆE SEA 
LES PLUS DES LELCTE 


Mos 


BE PIERRE PAND 


# 
# 
& 
# 
# 
# 
# 
# 
# 
# 
# 
à 
# 
# 
& 
& 
# 
& 
# 
# 
# 
# 
# 
& 
# 
ë 
# 
#& 
# 
# 
# 
Li 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
ë 
# 
# 
# 
ë 
# 
# 
# 
# 
& 
& 
# 
# 
# 
# 
& 
# 
# 
$ 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
# 
& 
# 
# 
# 
# 
# 
# 
& 
# 
# 
& 
# 
Li 
# 
# 
# 
La 
# 
# 
# 
# 
# 
# 
& 
# 
& 
# 
# 
# 
# 
# 


(*) Ouf! Il nous a épargné le Père 
Aihimpaire, le Père Mission et autre 
Père Sébille, NDLR 
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L'EVASION 
TELEMATIQUE 
SUR PCW 







Emballement, frénésie, plaisir, de nombreux qualificatifs peuvent tenter de 
décrire l'incroyable engouement des PCWistes pour la télématique. Fabuleux 
outils d’efficacité, de rentabilité et d'économie, elle constitue l’un des 
principaux pôles d'attraction des utilisateurs avisés. Alors, Minitel et PCW 
réunis en un véritable ménage de raison et de passion, méritent, plus que 
quiconque, une chronique régulière et dévouée au service de leur avenir. 


Longue vie aux amoureux ! 


COMME DES CHAMPIGNONS 


Les premiers services télématiques 
mis en place à partir du logiciel SYNEA 
commencent à s'insérer dans le 
«nouveau paysage télématique 
français » ; si vous vous êtes équipés 
d'un logiciel SYNEA, communiquez 
nous le numéro de votre serveur ainsi 
que votre activité professionnelle. 
Nous dresserons régulièrement une 
hste des serveurs professionnels pour 
permettre un échange permanent 
d'idées sur l'utiisation de SYNEA. En 
outre, les modalités d'un concours sur 
la plus belle page graphique minitel 
sont à l'étude... Tous à vos modules de 
composition d'écran minitel. 


CONTACTS EN TOUS GENRES... 


Utihsateurs de SYNEA, contrôlez bien 
vos contacts !!!! En effet, quelques 
SYNEISTES se sont posés quelques 
questions sur le bon fonctionnement du 
mode serveur de SYNEA... alors qu'ici, 
il s'agissait d'un mauvais contact de la 

prise gigogne du minitel dans la prise 
murale PTT... alors que là, le problème 
provenait d'un mauvais contact de la 
prise DIN mal enfichée à l'arrière du 

nitel 


UN MODEM QUI NE DEMANDE 
QU'A SE RETOURNER 


Il est possible d'utiliser le modem du 
minitel pour transformer votre PCW en 
centre serveur minitel. Dans ce cas, le 
modem minitel doit émettre à 1200 
bauds (bits/seconde) et recevoir à 75 
bauds ; ces vitesses de transfert sont 
nverses de celles en vigueur pendant 
une utilisation normale du minitel 
(15 bauds émission / 1200 bauds 
réception). Le fait d'allumer le minitel 
réinitialise ces vitesses pour une 


utilisation normale. L'inversion des 
vitesses pour l'utilisation du modem en 
mode serveur est réalisée UNE SEULE 
FOIS par logiciel lors du passage en 
mode serveur. Il est donc impératif 
d'allumer son minitel AVANT de 
passer en mode serveur pour que le 
retournement des vitesses soit 
correctement réalisé. Vérifiez aussi 
que votre minitel a bien un modem 
retournable, mdiqué sur la plaque 
arrière par «MINITEL R» ou 
« MODEM RETOURNABLE » 


POUR QUELQUES 
DOLLARS DE PLUS... 


L'Echo a testé pour ses lecteurs 
boursiers, un service minitel 
disponible par le 3615. MONEY (c'est 
son code d'accès), comprend les 
options indispensables à la gestion 
d'un portefeuille. Marché à terme et au 


MYNEA VLO0 x SYNATEL 1966 
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comptant, hors cotes, devise, or sont 
détaillés au cours du jour. Suprême 
intérêt de MONEY, il vous conseille 
activement : Actions à vendre ou à 
acheter, il vous donne un avis d'expert. 
Plus, pour chaque action consultée, il 
vous rappelle quelques informations 
indispensables (plus haut, plus bas, 
variation et conseil du jour). Une 
consultation super efficace avec 
MYNEA se fait à partir de commandes 
automatiques qui permettent l'accès et 
la mémorisation immédiate des pages 
concernant nos actions préférées. 
L'économie en temps de consultation 
est alors considérablement accrue et 
la logique est encore respectée : Time 
is money ! 


MONEY sur TELETEL 3 par 3616. 





MYNEA VERSION 2.0 


Devant le nombre important de 
personnes intéressées par la récupé 
ration des adresses de l'annuaire 
électronique pour effectuer des 
mailings, SYNATEL a considéra- 
blement amélioré la qualité et la 
souplesse d'extraction des adresses et 
rajouté un module de prise en compte 
du code postal à 5 chiffres. Ces 
améliorations font l'objet de la version 
2.0 commercialisée depuis le 15 mars. 








PARLONS FRANÇAIS... 


Quand la disquette contenant le CP/M 
(12FCPM3.EMS ou J14FCPM3.EMS) 
est pleine, le fichier PROFILE. SUB n'est 
plus exécuté lors du lancement et un 
message ERROR ON LINE 0010 est 
affiché. Ce message, pas très explicite, 
indique tout simplement que la 
disquette « déborde ». Pour résoudre 
le problème, faites un peu de ménage 
sur votre disquette en supprimant ou 
transférant un où plusieurs fichiers 
inutiles. Cette mésaventure est arrivée 
à un utilisateur de SYNEA qui, utilisant 
un PCW 8256, avait be de 
retourner la disquette SYNEA au 
moment de l'ouverture des fichiers de 
données présents sur la face 2. Ces 
fichiers avaient donc été créés sur la 
face 1 contenant les programmes et ne 
disposant pas de suffisament de place 
pour accueillir les fichiers de données, 
d'où le Write Error. 
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MYNEA, ou l’art du mailing par la 
récupération automatique 
des adresses de l'annuaire 
électronique. 
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PCW. 
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Spécial Emulateur : MY NEA 


ou l'art de faire du mailing par la récupération automatique 


des adresses de l'annuaire électronique. 


LE PCW, SUPER MINITEL 


L'une des facultés de MYNEA, logiciel 
d'émulation du minitel pour PCW, est 
de permettre l'extraction d'informa- 
üons des pages minitel consultées et 
de constituer ainsi des fichiers 
séquentiels utilisables par d'autres 
logiciels, notamment des programmes 
écrits en BASIC ou des programmes 
DBASE II. 


L'ANNUAIRE ELECTRONIQUE 


Le premier service minitel, mis à la 
disposition du public et des 
professionnels, est l'ANNUAIRE 
ELECTRONIQUE, gigantesque base 
de données, consultable par critères, 
constitué des adresses et numéros de 
téléphones des abonnés français aux 
PTT. Adieu les encombrants botins ou 
les longues attentes pour obtenir les 
renseignements téléphoniques (tél. 12), 
bienvenue à l'annuaire électronique 
accessible par minitel en composant le 
11 L'annuaire électronique constitue 
une fabuleuse source d'adresses 
professionnelles. Pourquoi ne pas 
l'utiiser pour faire du publipostage 
automatique ? 


LE PUBLIPOSTAGE 


Faut-1l le rappeler, le publipostage, 
appelé MAILING outre-manche, 
constitue la prospection d'un marché, 
ou la vente, par voie postale. Il s'agit 
d'envoyer un même courrier 
publicitaire où un appel d'offres à des 
dizaines, voire des centaines ou 
milliers, de destinataires, souvent 
ciblés par professions 





L'une des difficultés du publipostage 
est de trouver et d'éditer les adresses 
des destinataires, tâche fastidieuse si 
elle devait être effectuée manuelle- 
ment. Le programme BASIC 
MAILING.BAS (MAILING.BAS n'a rien 
à voir avec le logiciel MAILING pour 
LOCOSCRIPT), livré sur la disquette 
MYNEA, propose une méthode 
performante de constitution d'adresses 
à partir de l'annuaire électronique et 
d'édition automatique des adresses sur 
étiquettes ou sur listing A4 Ce 
programme permet de pallier au fait 
que le module d'étiquetage 
automatique de MYNEA limite le code 
postal aux deux chiffres du 
département. 


LA RECHERCHE D’ADRESSES 


Utiisons tout d'abord le logiciel 
MYNEA pour extraire les adresses de 
l'annuarre électronique. Pour exemple, 
nous traiterons les médecins 
généralistes du 3° arrondissement de 





LYON. L'ensemble des pages 
adresses du PCW-MINITEL peut être 
obtenu par pressions successives sur 
les touches F1 (mémoriser page) et — 
(afficher page suivante). Il n'y a 
pratiquement pas de perte de temps 
pour la mémorisation de chaque 
page sur le lecteur M (1 page = 1,5 
seconde). 


Une autre méthode pour mémoriser 
les pages est de constituer un fichier 
de commandes automatiques (COM.I 
dans l'exemple), exécuté par l'option 
F7 en cours de connexion au niveau de 
la première page d'adresses obtenue. 
Ce fichier de commandes (figure 1) 


NUMERO COMMANDE À AFFICHER : 1. 
TITRE : ANNUAIRE ELECTRONIQUE 


Figure 1 


EREEREERNSRERSSETI 


HERCHE 
NON 
OÙ PAR RUBRIQUE 


RUBRIQUE : ee GRÉRALIS TES... 


LOCALITE:LYON 63. 
facultatif à 
DEPARTEMENT : 





RS sn st rnciseniineteen our 
P 


0 
Dose oos sn osensoessssuss 


ligne suivante + SUITE 
ligne Précéérnte : pue 
ef fier à 
choisir dans une lis : UDE 
obtenir la réponse + ENVOI 


a l'avantage de pouvoir être utilisé 
sans modification, quelque soit la 
profession visée par la recherche. 


Le contenu du fichier COM.I est 
présenté sur la figure n° l I peutêtre 
créé à partir de l'éditeur interne de 
MYNEA où à partir de RPED 


L'EXTRACTION DES ADRESSES 


Une fois les pages minitel des adresses 
des médecins de LYON 3° mémorisées 
(figure 2), le PCW-minitel passe 
HORS LIGNE, soit manuellement par 
pression sur la touche EXIT, soit 
au niveau de la commande 
$DECONNECTER du fichier COM.I 51 
vous adoptez la solution «tout 
automatique ». Nous avons ainsi 
mémorisé 20 pages d'adresses sur le 
lecteur M; utilisons alors l'option 
ANNUAIRE ELECTRONIQUE de 
MYNEA par appui sur la touche CAN. 
Indiquons alors le nom du fichier 
destiné à mémoriser les adresses 
extraites, soit B:MEDE3.ADR dans 
notre exemple. À la question 
«Impression des adresses sur 
étiquettes (O/N) ? », nous répondrons 
N dans la mesure où cette Hs 
au nmveau de MYNEA limite le code 
postal aux deux chiffres du 
département. Nous positionnons 
ensuite la barre choix sur ADRESSES 
TOUTES PAGES» et validons par 
RETURN (figure 3). La sauvegarde des 
adresses dans le fichier B:MEDE3.ADR 
s'effectue alors automatiquement 
Appuyons ensuite sur la touche CUT 
pour revenir au CP/M. À ce stade les 
adresses sont extraites et 
sauvegardées dans le fichier 


[CA Page précédente [EM Page suivante 
He Affichage direct 

iner page 
CC AN | ne aire Electronique 


CEE disque 
pr dise 


BE Commandes autonatiques 


M Pope Atden ce Rinitel 


BR Echo el ! non 
Retour CP/N 


Ba Exécuter commande autonatique 
éaoriser page en cours 


XIE Connexion-fin 
BAT Envoi 


Retour 
[JET] Correction 
BE Répélition 


lt 1 | res ire 


BOSS 
[TI | Diable 
BAAAVE Guide 





Figure 2 
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annualre ecironique 


idon Jean « eus 78 54 51 86 


6 rte Genas 


Sr fe Bent iles 90 


6 Bellaiche Nino 78 54 25 58 
45 av Georges Pompidou 3e 


page suivante + SUITE 
PAGE: 17 19) 


Figure 3 





séquentiel MEDE3.ADR présent sur la 
disquette insérée en B. Passons 
maintenant à la phase de traitement de 
ce fichier. 


LA MISE A JOUR DU FICHIER 
ADRESSE. DON 


Le programme (écrit en Basic Mallard) 
MAILING. BAS permet de traiter tout 
fichier d'adresses extrait par l'option 
Annuaire Electronique de MYNEA 
(MEDE3.MAS dans l'exemple) ; il est 
exécuté par l'instruction B> BASIC 
MAILING (figure 4). 


Les possibilités de traitement de 
MAILING.BAS sont les suivantes : 


1. Ajouter les adresses du fichier 
extrait (MEDE3.MAS dans l'exemple) 
au fichier ADRESSE.DON constitué du 
cumul des adresses extraites lors de 
sessions précédentes. 


2.Imprimer les adresses de 
MEDE3.MAS sur un listing à une 
rangée d'étiquettes. 


8.Imprimer les adresses de 
MEDE3.MAS sur un listing de format 
A4 (210x297), Chaque adresse est 
imprimée dans le cadre supérieur 
gauche de chaque feuille et cadrée 
pour être utilisée dans des enveloppes 
à fenêtres normalisées. 


4. Des facilités de recherche par nom, 
profession et code postal (ou 
département) sur le fichier 
ADRESSE.DON. 


Lors du traitement des adresses du 
fichier extrait, vous disposez de 
plusieurs options : 


e si toutes les adresses ont toutes le 
même code postal, indiquer-le au 
début du traitement ; le même code 
postal sera alors « plaqué » sur chaque 
adresse. 


e si le traitement porte sur les adresses 
d'une ville à arrondissement (cas de 
notre exemple), vous avez la possibilité 
d'indiquer que l'arrondissement, donc 
le code postal, est indiqué dans la 
désignation de la rue, (c'est le cas de 
notre exemple). 


esi le traitement porte sur des 
communes d'un même département, il 
est possible d'utiliser le fichier des 
codes postaux du département 
constitué à partir du programme 
CP.BAS (fourni également avec la 
disquette MYNEA). 


REUTILISER LE FICHIER 
GLOBAL DES ADRESSES 


Lors de la mise à jour du fichier global 
ADRESSE.DON, vous pouvez indiquer 
une profession commune au fichier 
extrait, dans notre exemple, nous 
indiquerons MEDECIN (figure 5). Cette 
profession est associée à chaque 
adresse dans le fichier 
ADRESSE.DON. Cette indication 
permet, par la suite, de retraiter 
(affichage, impression d'étiquettes ou 
listing) le fichier ADRESSE.DON par 
critères : profession et département 
(ou arrondissement). 


LES FICHIERS DES CODES 
POSTAUX PAR DEPARTEMENT 


Le programme basic CP.BAS livré 
avec MYNEA) permet de constituer et 
de mettre à jour les fichiers des codes 
postaux par département. Chaque 
fichier départemental ainsi créé et mis 
à jour peut être réutilisé par le 
programme MAILING.BAS pour la 
mise à jour automatique du code postal 
sur les adresses de l'annuaire 
électronique. 


EN CONCLUSION 


Les togiciels MYNEA V 2.0 permettent 
de réaliser avec une grande efficacité 
des mailings importants et de vous 
constituer un fichier d'adresses global 
consultable par professions. Très 
souple d'emploi, ils devraient vous 
faire réaliser d'importants gains de 
temps... et d'argent. 


M GERMAIN DELALANDE 


ALRESOLS L'INA )L L LEU [AUNILU 
YAMUUMUMUEUNN IN UNUUVEUNNEUYSES PRET PER PTE LEE ET EPL EEE TT POTITE PTT E TENTE TPTT 


Explications, 
Retour CP/A, 


D 3 9  JJ1 = CGJ [IS re 


Votre choix : 


Nettre à. jour le fichier ADRESSE.DON 

Inpriner adresses sur étiquettes, 

Inpriner adresses sur listing M, 

Recherche/Inpression par critères dans ADRESSE. DON. 

Liste ADRESSE.DON par ordre alphabétique des nons. 

Nodifier paranètres d'iapression (initialement double frappe/car, noraaux). 





Figure 4 
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Spécial Serveur : : SYNEA 


la mise en place d’un service télématique sur PCW 
2° Partie : LES MNEMONIQUES 


RESUMONS-NOUS 


Lors du précédent numéro de l'écho, 
nous avons vu qu'il était relativement 
facile de mettre en place un service 
d'informations sur PCW accessible par 
minitel, sous forme d'un ensemble de 
pages minitel pré-dessinées (ou pré- 
composées) ; l'ordre d'affichage des 
pages (ou enchaînement) était pré 
défini au niveau du PCW-serveur sous 
a forme d'une arborescence, avec le 
principe suivant : 


Un minitel appelle le PCW, en 
composant directement le muméro de 
éléphone associé à la prise PTT du 
serveur; le serveur lui envoie un 
Dremier écran (immuablement 
Racine.som) page d'accueil du 
service télématique; cette page 
Dropose plusieurs choix pour 
‘obtention d'autres pages, ces choix 
étant prévus dans la liste de 
‘arborescence. Si le minitel entre un 
choix non prévu dans cette liste, le 
PCW Iui envoie en première ligne le 








PRES 
PRE. 50€ 


PROD 
PRODUIT . SOM 


COMPOSITION D'ECRAN MINITEL 
ARPORESCENCE DES ECRANS 

CROIRAIT 
EDITES AUX LETTRES 


JOURNAL CYCLIQUE 

GESTION DES COMMANLES 
PASSER EN MODE SERVEUR 
DATE DU JOUR 61/01/87 
CONFIGURATION DISRUES : MA 


|] VERSION MODEM MINITEL : NON 


Fin du programe 


Figure 6 





message « CHOIX NON DISPONIBLE » 
et lui propose de formuler un autre 
choix 


Cette méthode d'enchaînement de 
pages minitel a l'avantage de 
permettre au minitel appelant de 
trouver infailliblement la ou les pages 
d'informations recherchées, en 
«cheminant» à son rythme dans le 
service et en répondant successi- 
vement aux choix qui lui sont proposés 
sur chaque page. 


L'inconvénient de l'arborescence est 
d'obliger le minitel appelant 
réguhèrement (et par suite connaissant 
bien le service) à passer par 
l'affichage de plusieurs pages pour 
obtenir la « bonne » page d'information 





C'est une perte de temps importante 
dans la mesure où la vitesse 
normalisée de transfert Serveur — 
Minitel est lente Fe 200 bauds, soit 120 
iractères/seconde). Il fallait donc 
trouver une solution pour améliorer 
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APPA REPL COUV 
PRODUIT . APP PRODUIT .RP PRODUIT .COL 


$SUITE 


PRODUIT.CDe 


RETOUR 


COMA 





Figure 7 
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01/01/87 - MNEMONIQUES D'ECRANS - 


fnenonique 


l'efficacité des consultations ; c'est 1c1 
que les MNEMONIQUES entrent en 
scène. 


LES MNEMONIQUES 
D'ACCES DIRECT 
AUX ECRANS (MOTS CLES) 


Côté utilisateur, le principe est très 
simple : quel que soit l'écran affiché 
sur le minitel connecté, celui-ci a la 
possibilité d'obtenir DIRECTEMENT 
n'importe quelle autre page du service 
télématique, en indiquant le 
mnémonique d'accès associé à cette 
page. 


Côté serveur, la mise en œuvre n'est 
pas plus compliquée : 1l s'agit d'asso- 
cier un (ou plusieurs) mnémonique 
à chaque page d'information du 
service, pour cela, sélectionnons 
l'option MNEMONIQUES D'ECRANS 
au niveau du menu général SYNEA : 
au départ, la hste des mnémoniques 
est vide ; nous avons alors la possibilité 
d'ajouter des mnémoniques en 
appuyant sur la touche [+]; reprenons 
pour exemple le service télématique 
TYREL décrit dans le précédent 
numéro, et associons à chaque écran 
de ce service un mnémonique 
d'accès ; la figure 7 rappelle l'archi- 
tecture du service; la liste des 
mnémoniques à définir est illustrée par 
la figure 8. 


Cette liste de mnémoniques est 
préparée à l'avance au niveau du 
serveur, ainsi, dans l'exemple ci 
dessus, si le mnitel connecté entre le 


In 


Non bcral a559C18 


PRODUIT Me 


PRODUIT COL 
RSS. 
DIRE. son 
PRODUIT RP 
RAC 


OM 





THONIENS (- MANS 
JCOMNELE LIT Mal 
Figure 8 
choix APPA, le PCW-serveur lu 


transmettra l'écran PRODUIT.APP 
(Appareils à reler) etc. 


ARBORESCENCE 
OÙ MNEMONIQUES, 
QUE CHOISIR ? 


Le principe des enchaînements de 
pages par Mnémoniques interdit 
d'associer un même choix à plusieurs 
pages différentes 


Un mnémonique, par définition, est 
UNIQUE. Cependant, 1] peut être utile 
qu'un même choix aboutisse à 
l'affichage de différentes pages. Il en 
est ainsi des choix correspondant à 
l'appui sur les touches fonctions du 
minitel; l'enchaînement de pages 
minitel par appui sur ces touches ne 
peut être défini que par l'arbo- 
rescence, car ils dépendent de l'écran 
en cours d'affichage 


L'Arborescence et les Mnémoniques 
sont donc des moyens complémen- 
taires pour définir un service 
télématique alliant souplesse 
d'utilisation et performances 


UN CONSEIL 
DE SPECIALISTE 


Dans le manuel d'utilisation de SYNEA, 
SYNATEL, éditeur du logiciel, 
conseille de préparer l'enchaînement 
des pages minitel à l'aide des 
mnémoniques et de réserver 
l'enchaînement par arborescence à la 


+ 


XAXXXKAYEXAXKXA 


A gouter 
Supprimer 


définition des touches fonction du 
minitel 


Pour cela, 1l faut éviter de proposer sur 
les écrans du service des choix 
répétitifs du type 1 2 3 4... mais plutôt 
indiquer «progressivement» les 
mnémoniques disponibles 


Cette méthode permet aux minitellistes 
de se familiariser avec les 
mnémoniques du service et par la 
suite, de pouvoir accéder directement 
à la bonne page depuis la page 
d'accueil RACINE.SOM. C'est cette 
méthode qui a été retenue pour le 
service télématique de l'ECHO. 


ET LA PREPARATION 
DES PAGES ? 


Préparer l'enchaînement des pages 
minitel est la première des choses à 
mettre en place lorsqu'on prépare son 
propre service télématique ; ceci étant 
fait, 1l reste à préparer chaque page 
d'information destinée à être transmise 
par le PCW au minitel. 


Outre l'information à faire passer, 
chaque page doit proposer plusieurs 
choix pour l'obtention d'autres pages. 
La préparation des pages est l'objet du 
module de COMPOSITION D'ECRAN 
de SYNEA que nous vous décrirons le 
mois prochain. 


B GERMAIN DELALANDE 
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 DELUGE ASC II ;: 


L’'ASCII est sans conteste l’espéranto de nos machines. Sa compatibilité permet d’entrevoir avec 
sérénité la communication entre programmes et machine au point qu'utilisé judicieusement, 
il nous évite de nombreuses manipulations souvent source d'erreurs. Notre troisième partie 
aborde l'aspect particulier de l'aide que les codes ASCII apportent en matière de programmation. 


Si Boileau avait eu la chance de toucher nos joyeux claviers, 
il nous aurait sûrement proposé 4 l'art informatique » qui lui 
aurait peut-être évité tant d'agressivité envers la gente 
féminine... Il aurait pu commencer par l'ASCII est aisé et l'art 
est difficile ! 

Et de conseiller à ses lecteurs ravis d'éditer sans attendre. 


En effet, les fichiers ASCII offrent une souplesse de travail 
souvent inexploitée malgré la simplicité avec laquelle il 
peuvent être manipulés. 


Si nous ne reviendrons pas sur le principe des fichiers ASCII 
(cf Echo N°5, Déluge N°1), il me semble indispensable de 
rappeler l'essentiel : 


LES FICHIERS ASCII POUR QUOI FAIRE ? 


Les fichiers ASCII peuvent faire n'importe quoi et cela 
dépend plus particulièrement du programme qui les utilise. 


e Un fichier PROFILE.SUB est un fichier ASCII qui contient 
des ordres que nous aurions dû normalement taper au 
clavier mais leur exécution dépend du programme 
SUBMIT.COM qui est le seul à pouvoir nous remplacer. 


e Un programme BASIC tapé sous LOCOSCRIPT et sauvé au 
format ASCII peut parfaitement être exécuté par 
BASIC.COM. 


e Un tableau MULTIPLAN peut s'imprimer dans le sens de 
la largeur avec le logiciel ROTATE si ce tableau a 
préalablement été sauvegardé en ASCII. Il peut aussi être 
intégré dans un texte LOCOSCRIPT par l'option d'insertion 
de ce dernier ou mieux encore, transmis à un autre 
ordinateur pouvant être de marque différente par l'emploi 
du programme MAIL232.COM livré par AMSTRAD. 


On distingue ainsi deux familles de fichiers ASCII. Les 
fichiers de commandes qui selon un format spécifique sont 
interprétés par un programme, les fichiers de textes dont la 
signification n'est pas liée à l'utilisation par un programme 
interprète mais dont l'usage se limite à l'édition et à la 
communication et les fichiers de données qui sont porteurs 
d'informations destinées à être récupérées par un 
programme de traitement. Notez que ces types sont 
rigoureusement identiques en terme de création et de 
stockage et que cette distinction n'est liée qu'à l'usage auquel 
on les destine. Ainsi, un fichier de commandes peut être traité 
comme du texte alors qu'un fichier de texte ne peut l'être 
que s1 son contenu respecte les instructions que reconnaît 
son destinataire présumé. 


EDITEUR, INTERPRETEUR 
ET COMPILATEUR 


Cette entrée en matière me permet maintenant de vous 
expliquer l'indispensable distinction entre un éditeur et un 
interpréteur. 


L'éditeur permet la création et la manipulation de fichiers 
ASCII. Le plus connu est LOCOSCRIPT et nous savons tous 
comment il fonctionne (en théorie, on distingue un éditeur 
d'un traitement de texte par le fait que le premier n'édite 
que des fichiers ASCII sans offrir de fonctions d'habillages 
(gras, italique, pica, etc... De nombreux traitements de texte 
savent récupérer et sauvegarder des fichiers ASCII, on peut 
donc les assimiler aux éditeurs). D'autres éditeurs sont aussi 
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disponibles et pas plus loin que sur les disquettes système 
hvrées par AMSTRAD. ED.COM et RPED.BAS sont deux 
éditeurs que tout utilisateur de PCW possède. Le premier 
est beaucoup plus performant que le suivant et son utilisation 
mériterait un article entier. Il est aussi beaucoup plus 
compliqué à manipuler alors que RPED reste d'une 
désarmante simplicité souvent suffisante à la création de 
nombreux petits fichiers ASCII. Autre différence notoire, 
ED.COM tourne directement sous CP/M alors que RPED fait 
appel au BASIC. 


Mais ce n'est pas tout. Les éditeurs de tout poil hantent 
les étagères de vos revendeurs habituels : TASWORD, 
WORDSTAR mais aussi DBASE (option MODIFY 
COMMAND). 


Pour résumer, l'éditeur permet de créer, de charger, de 
manipuler et de sauvegarder un fichier ASCII de contenu 
totalement libre. Seules les performances les distinguent : 
rapidité, taille des documents, facilité de correction, de 
déplacement, etc... 


L'interpréteur comme son nom l'indique, ne fait 
qu'interpréter un fichier ASCII pour exécuter immédiatement 
les ordres que son contenu recèle. Il faut garder à l'esprit 
que cela n'est possible que parce que le contenu du fichier 
suit une syntaxe et une organisation que le programme est 
capable de reconnaître et d'utiliser. Ainsi, un fichier de 
commande BASIC respectera certains impératifs comme la 
longueur des lignes (moins de 255 caractères), la 
numérotation des lignes et les instructions que BASIC 
reconnaît (GOTO, GOSUB, PRINT, etc...) 


Pour résumer, l'interpréteur est un programme qui 
comprend et exécute immédiatement un fichier ASCII à la 
seule condition que son contenu soit conforme à la syntaxe 
que ses programmeurs ont prévue qu'il comprenne. 


Le compilateur est aussi un interpréteur en puissance mais 
se distingue de celui-ci par le fait qu'il n'est pas prévu pour 
exécuter un programme mais pour le transformer en 
programme exécutable par le système d'exploitation (lui- 
même étant un programme, ne l'oublions pas). Ainsi, un 
compilateur PASCAL va transformer en programme objet 
(exécutable sous CP/M) un fichier ASCII écrit suivant la 
syntaxe qui est la sienne. Ceci m'amène à vous préciser que 
si l'ASCII permet une standardisation notoire, il n'empêche 
nullement l'incompatibilité quasi totale de langage qui 
semble pourtant indentique. L'exemple le plus flagrant est 
celui du BASIC MALLARD de LOCOMOTIVE qui, sauvé en 
ASCII, ne sera pourtant pas compilable par le CBASIC 
COMPILER de DIGITAL RESEARCH et ceci pour une raison 
aussi simple que fort gênante : ils n'utilisent pas la même 
syntaxe et de nombreux ordres sont particuliers à l'un ou à 
l'autre. 


Si ces incompatibilités notoires provoquent de nombreuses 
critiques, il faut tout de même considérer les particularités 
de chacun comme étant liées à l'évolution des langages qui 
deviendraient rapidement d'une lourdeur et d’une taille en 
totale contradiction avec la rapidité supposée de leur 
traitement mais aussi celle dont font preuve les développeurs 
(il est connu que la compétition fait rage et que l'esprit est 
plutôt à la concurrence farouche qu'à la confraternité 
débonnaire). 


DELUGE ASCII 


Pour résumer, le compilateur transforme en codes objets, 
exécutables par le système d'exploitation, un fichier ASCII 
dont le contenu suit la syntaxe reconnue par le compilateur. 
Ce fichier ASCII est ce qu'on nomme poêtiquement le fichier 
source ou plus court le source. 


ASCII BON POUR LE SERVICE 


Si la génération d'un fichier ASCII se fait très souvent à l'aide 
d'un éditeur ce n'est pas toujours obligatoire, l'exemple le 
plus commun est celui des programmes générateurs 
capablent de créer des fichiers ASCII. PRINTER MAKER 
de ce même numéro en est un exemple simple. 


Ce programme basic vous propose de choisir des options 
d'impression et génère selon votre gré deux types de fichiers 
ASCII Le premier respecte la syntaxe de l'utilitaire 
SETLST.COM (voir Echo N°5) et le suivant respecte la syntaxe 
des fichiers de commandes DBASE. Ainsi, de nombreux 
générateurs utilisent l'ASCII pour créer des fichiers 
utihsables par des programmes interprèteurs ou des 
programmes compilateurs. 


On peut ainsi rêver à un générateur de programme dans un 
langage quelconque obtenu à partir de menus ou de choix 
tels que AFFICHER AU MILIEU DE L'ECRAN LE NOM DES 
3 ELEVES AYANT LES MEILLEURES NOTES APRES QUE 
J'AI RENTRE LES RESULTATS DES 5 DERNIERS DEVOIRS 
ET METTRE EN INVERSION VIDEO CELUI DONT LA 
MOYENNE EST LA PLUS HAUTE... 


J'espère que cette idée va inspirer plus d'un programmeur 
car une application de ce type pourrait bien faire un tabac... 





D'autres programmes ont la particularité de générer des 
fichiers ASCII de type texte dont le but n'est pas de donner 
à un programme une suite d'instructions qu'il comprend mais 
simplement des données brutes qu'il utilise pour son propre 
traitement. Ainsi MULTIPLAN peut sauver une feuille de 
calcul selon le format ASCII et ce pour des utilisations 
totalement différentes et néanmoins complémentaires. 


EXEMPLE : À partir d'un même fichier ASCII on pourra 
obtenir 3 traitements d'impression distincts ; 


- En verticale avec ROTATE 
- Dans un texte avec LOCOSCRIPT ou TASWORD 
- En graphique avec PCWGRAPH ou DR-GRAPH 


LES CONTRAINTES DE LA COMPATIBILITE 


Nous avons entrevu le problème de la syntaxe des fichiers 
devant être interprétés ou compilés mais ce n'est pas la seule 
(vous commencez à entrevoir ce qui fait le charme de 
l'informatique ?!). 


D'abord, les noms des fichiers ont une importance souvent 
cause de renoncement pour le débutant alors que l'utilisateur 
forcené y pense systématiquement dès qu'il rencontre le 
moindre problème. Les particularités des noms de fichiers 
résident plus souvent dans les extensions (les trois lettres qui 
suivent le point dans le nom) que dans leur nom, mais ce n'est 
pas toujours vrai. Si les éditeurs font fi de ce genre de détail, 
les interpréteurs, les compilateurs et de nombreux 
programmes exigent de l'extension qu'elle soit conforme à 
leurs aspirations profondes. Pour preuve, le BASIC ne charge 
un fichier ASCII venu 
d'un CPC que s'il porte 
l'extension BAS (cf Echo 
3 page 36), DBASE quant 
à lui, n'interprète un 
fichier de commande 
que si CMD orne son 
nom. Plus connue 
encore, SUBMIT.COM 
qui n'exécute que les 
fichiers portant l'exten- 
sion SUB et en exéetüte 
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un seul lors du démarrage du système quand son nom est 
PROFILE SUB. 

Ensuite, la compatibilité impose que l'on limite l'utilisation 
des codes ASCII aux 128 premiers car ce sont les seuls 
absolument compatibles, je vous déconseille donc l'usage 
de l'accentuation et de façon générale tous les codes 
supérieurs à 127. 

Enfin, les formats internes aux fichiers sont souvent source 
de tracas pour ce qui concerne leur récupération et leur 
utilisation. 

Les fichiers ASCII font l'objet d'un codage interne que tout 
utilisateur doit connaître. Les codes de textes sont relatifs au 
contenu du fichier. Compris entre 32 et 126, ils sont 
visualisables à l'écran ou à l'imprimante. 

Exemple : A=-65 $=-36 

En BASIC : PRINT ASC(‘"‘A") ou PRINT ASC(‘"$"). 

Les codes de contrôle (0 à 31) n'ont pas tous une influence 
notoire sur le format j'irais même jusqu'à dire que certains 
ont des effets assez désastreux. Les plus intéressants sont 
13 (ALT +M ou &HO0D) pour le retour chariot et 26 (ALT +Z 
ou &H1A) pour la fin de fichier. Ainsi, dans de nombreux cas, 
les programmes appelants se servent de ces codes pour 
organiser la récupération d'un fichier ASCII. On peut citer 
le BASIC dans une récupération séquentielle qui considère 
le code 13 comme la fin d'un enregistrement et le code 26 
comme une fin de fichier (EOF=END OF FILE). 

D'autres codes ont aussi un impact mais pas particulièrement 
sur la structure du fichier, mais plutôt sur sa présentation. 
Le code 10 (ALT +]J ou &HA0 en hexadécimal) permet le saut 
de ligne en évitant une surimpression des textes à l'affichage, 
le code 9 (ALT +I ou &H09) est le code de tabulation dont 
la longueur standard est généralement de 10 caractères. 
Cette dernière affirmation explique pouquoi la transformation 
de texte LOCOSCRIPT en format ASCII est complètement 
bouleversée lorsque les tabulations qui se trouvaient dans 
le texte original étaient placées à des intervales différents 
de 10 caractères. 

Pour vérifier ce dernier chapitre, vous avez en main tous les 
atouts. Vous disposez, sur la face 3 de vos disquettes système 
d'un utilitaire fantastique pour l'espionnage intégral des 
fichiers ASCII Il s'agit de DUMP.COM qui s'utilise de la façon 
suivante. 

Nous voulons connaître le contenu d'un fichier ASCII nommé 
TOTO.ASC alors nous faisons : DUMP TOTO.ASC [RETURN] 
et le résultat (figure 1) confirme mon propos. 

Cette dernière manipulation étant sans aucun danger pour 
vos fichiers, je ne peux que vous encourager à la pratiquer, 
sans retenue, sur tous vos fichiers (programmes et fichiers 
ASCII). C'est plein d'enseignements... 

Pour terminer, je joins en figure 2, le nouveau listing de 
LOCASC.BAS qui après de sérieuses améliorations, peut 
maintenant remettre en état des fichiers ayant des lignes 
supérieures à 255 qui était la limite de notre précédente 
version. Pour les lecteurs qui n'ont pas eu la chance de 
posséder l'ncomparable n°6 de notre humble gazette, je 
précise que LOCASC fonctionne sous BASIC et permet de 
remettre les caractères accentués des fichiers ASCII 
générés par notre bon ami le seigneur LOCOSCRIPT. 


(suite page 48) 


MDUNP 1010.ASC 


= 


D Taie] 
n 
3 


VOILA UN PETIT F 
ICHIER ASCII... li 
gne suivante qui 
se teraine ici, 
et reprend là.. 


Lil 2 dl 
eo 
eur 

es D ÉD 


Sa 


Len fentes ns 23 Em ÉD | 


2222011000 
= pt 
52-83 


CN PONT en 


DDDOVRCOUeCS 


SSSR de 


deg it con L'el 
Cd md > ne 
Dr58028i 
be pq SD 

be purqee GDS UT 
23555000 
tente D DD En 3 
DB 22 00 DE CS D 
D222aUIRL001 
S5ss22Se 
22206650 
Le us tu D DCS D ÉD 
D2D22SVSOCOE 


D Qu Qt 
22: 
Lee ben ps I DD ed 


ee ee ts 


osseuses 


Figure 1 


DELUGE ASCII 


MAILING : 
LA NOUVELLE DIMENSION DE LOCOSCRIPT 


LOCOSCRIPT est un véritable séducteur. Simple, pratique et convivial, il s'avère être le traitement 
de texte le plus adapté à la correspondance rapide et efficace. Malgré cette évidence, LOCOSCRIPT 
est resté résolument fermé à toute compatibilité avec une quelconque gestion de fichier pour 
faire ce que nombre d'utilisateurs avertis attendent d'un traitement vraiment performant : 


Le Mailing. 


Fils naturel d'un traitement de texte et d'une gestion de 
fichier, le mailing est un pur produit informatique dont le 
succès ne fait que croître depuis près de dix ans et ce, pour 
le plus grand bonheur des P.T.T. 


Pourtant, utilisé pour la prospection commerciale, ses effets 
ont considérablement diminué sur les destinataires. On peut 
parler d'outrance ou de cible mal calculée, les résultats sont 
de l’ordre de quelques unités par mille envois dans des 
prospections à large spectre. Malgré cela, le mailing reste 
l'un des meilleurs moyens d'informer par écrit et avec 
précision un nombre important de personnes plus où moins 
choisies sur des critères de sélection connus. 


L'intérêt de cette méthode n’est alors plus lié à son principe 
mais à un environnement connu dont dépend la qualité du 
mailing : Le fichier d'adresses (sa tenue et la qualité des 
informations), le message à transmettre (lisibilité, intérêt, 
accroches), la sélection des destinataires (les critères de 
choix). 


Entreprises, travailleurs indépendants ou particuliers, tous 
ont de nombreux prétextes d'utiliser un mailing, en voici 
quelques uns : 


ENTREPRISE PARTICULIER 
- Convocations d'actionnaires Invitations 

- Tarifs, nouveautés, promotions Faire part 

- Changements d'adresse Idem 

- Demandes de prix et de documentation Idem 


- Offres de service Recherche d'emploi 


La liste n'est pas limitée et les idées jailliront vite dans les 
esprits. 


Quoiqu'il en soit, le principe du mailing est connu et seuls 
les petits détails méritent une 
attention particulière car ils 
conditionnent presque totalement 
l'efficience du traitement. 


Le logiciel MAILING, développé 
par Technical Consultancy, va 
servir de support et l'étudiant avec 
précision, on doit arriver à 
déterminer ses limites, ses talents 
afin de réaliser dans quelle mesure 
il pourra rendre les services 
que l’on escompte d'un tel 
programme. 


SPLIT prend un 


PRINCIPE 


Comme dit plus haut, le mailing 
constitue un traitement interactif 
de documents issus d'un éditeur 
et d'une gestion de fichiers. Le 
logiciel a la charge de récupérer 
des informations contenues dans 
un fichier (adresse, chiffre 


Cission de :- 3 
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d'affaire, etc) et de les insérer dans un document (courrier, 
offre spéciale, situation comptable, etc) et ce, avec ou sans 
sélection (sur une région, une profession, un chiffre d'affaire, 
etc). 


Dans un cas, il fait le pont entre données de l'un et texte 
de l’autre en laissant à chacun ses spécificités, l'exemple 
le plus connu reste MAILMERGE de WORDSTAR POCKET 
qui peut traîter des fichiers DBASE. Cette méthode est 
indiscutablement la plus performante car DBASE est un 
programme puissant duquel on peut extraire des informations 
ayant fait l’objet d'une sélection ultra sophistiquée. Cette 
possibilité est indéniablement alléchante mais souvent inutile, 
généralement lourde à mettre en place et certainement plus 
onéreuse que l'autre cas. 


L'alternative est d'inclure la gestion de fichier dans le 
programme chargé de personnaliser les textes. C'est la 
solution retenue par Technical Consultancy. Si les possibilités 
sont loin des performances Dbasiennes, elle offre une 
souplesse et quelques petits raffinements qui lui permettront 
de répondre à de nombreuses exigences. 


MAILING - LA GESTION DE FICHIERS 


De concert avec sa vocation, cette option permet de gérer 
un ou plusieurs fichiers. Totalement indépendants les uns 
des autres, ils sont construits selon un canevas identique 
{nous verrons le détail plus loin). On note que le programme 
n'autorise ni fusion, ni transfert de données d'un fichier vers 
l'autre et cela peut paraître gênant. 


Exemple : on dispose d'un fichier de prospects et d’un fichier 
de clients, le prospect devient client, il faut alors transférer 
sa fiche d'un fichier à l'autre. 


DIVISEUR DE FICHIER MAILING 


fichier existant et en génère , Le LL identique, ta, peut ani ne 
une copie Purtielle e l'original (ex: Enr, 3-24 
L'effacenent est évité en levant la languette de protection de la disquette. 


ou Enr, ) ou le fichier coaplet 


Pressez 'C' pour continuer ou 'EXIT' C 


CLIENTS 
ou B)? À 


Tapez nunéro entrée ou son no4 . 


Figure 1 


MAILING LOCOSCRIPT 





| GESTION DE FICHIERS | 
es ss 3 


CAE ns 
MENU PRINCIPAL 


ETS TRIPALAIR ET COMPAGNIE 
545 PASSAGE À TABAC 


SRE 


nos sincères salutations 


Fe et BIDOVENT 


SALUTATION : 


TER 
Filtre 
VPE DK CLIENT 


ATTRIBUTS 


ï 


A0,B5,C3,D3,D5,D8,R6,F9,G1 


Par ? & & Sélectionnez la Ligne et "EXIT' quand c'est fait. 


Figure 2 


Seul un utilitaire livré avec le programme (SPLIT.COM) 
permet la duplication, partielle ou totale, d'un fichier déjà 
constitué (figure 1). 


L'organisation des fichiers est relativement classique. 
Chaque fiche contient un nombre de champs (ou rubriques) 
compris entre 8 et 13 qui autorise l'entrée d'un maximum 
de 50 caractères par champ ce qui est suffisant pour une 
majorité d'applications (figure 2). 


8 autres champs sont fixes en cela que leur intitulé ne peut 
être modifié par l'utilisateur. Les voici : 


RUBRIQUES 

NOM (nom, prénom, enseigne) 

ADRESSE {1er partie de l'adresse, ex. batiment, résidence, etc) 
RUE (2e partie de l'adresse} 

CODE (postal) 

VILLE 

PAYS 


SALUTATIONS (formule de politesse) 
ATTRIBUTS Nous en parlerons plus loin. 
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Ces champs peuvent très 
bien servir à tout autre con- 
tenu que celui prescrit par 
l'intitulé. Ce truc est utile 
pour ceux qui n'ont pas for- 
cément à gérer des person- 
nes ou des sociétés en 
ayant tout de même besoin 
de la personnalisation de 
document. 


Exemple : Un botaniste 
peut classer les résultats de 
ses cueillettes et affecter à 
la rubrique RUE le nombre 
de pétales d'une fleur (des 
champs évidemment !). 


Dans le cas qui vient d’être 
abordé, il faut alors tenir 
compte de 2 particularités 
de MAILING: 


1 - Lors de la personnalisa- 
tion d'un document 
LOCOSCRIPT relatif à ce 
fichier, le champ « RUE » 
doit obligatoirement être 
mentionné pour obtenir le 
nombre de pétales inscrit 
dans ce champ. 


2 - La rubrique NOM est la 
seule sur laquelle le fichier 
trie les fiches mais aussi sur 
laquelle peut s'effectuer la 
recherche visant à modifier, 
visualiser où supprimer une 
quelconque fiche. De plus, 
cette recherche se fait de 
façon suffisamment carac- 
téristique pour avoir droit à 
une mention spéciale. En 
effet, elle s'effectue sur le 
dernier mot et non sur le 
premier. C'est assez astu- 
cieux et souvent très prati- 
que mais pas toujours. 


Exemple : Si NOM contient 
Mr JEAN PASSE, le classe- 
ment se fera sur PASSE. 


Par contre, si NOM contient Sté FORTOU Père & fils, c'est 
fils qui sera pris en compte... Plutôt gênant mais contour- 
nable par l'utilisation d'un signe de séparation autre que 
l'espace, ex. Sté FORTOU __ Père __&_ fils. 


Cinq champs libres sont redéfinissables par l'utilisateur et 
permettent la mémorisation d'informations différentes de 
l'adresse (téléphone, télex, acheteur, mensuration de la 
secrétaire, etc). Une fois créés, ils fonctionnent de façon 
identique que les champs fixes avec, toutefois, la possibilité 
de les rebaptiser à tout moment. 


Enfin le dernier champ réservé aux attributs est d'un usage 


très particulier qui mérite un détour. 


MAILING - GESTION DES ATTRIBUTS 
Fichier dans le fichier, le gestionnaire d’attributs de MAILING 


est un modèle de simplicité et d'efficacité. Constitué selon 
une bibliothèque numérotée de A à Z, le gestionnaire autorise 


MAILING LOCOSCRIPT 


10 options par lettre. Plus qu'un long discours, la figure 3 
Les champs d'attributs sont 
entièrement paramétrables et accessibles à tout moment 
pour correction ou suppression. lIs offrent une très grande 
clarté alliée à une incomparable souplesse. 


Les attributs ainsi définis seront repris dans le champ 
d'attributs de chaque fiche et serviront à l'impression 
sélective en fonction de la volonté de chacun (figure 4). 


l'illustre parfaitement. 


Exemple : 
CHAMP A : CHIFFRE D'AFFAIRE avec 
AO = 10000 
A1 = de 10000 à 50000 
A2 = + de 50000 
CHAMP B : TYPE DE CLIENTS avec 
BO = REVENDEUR 
B1 = GROSSISTE 
B2 = EXPORTATEUR 
B3 = GRAND COMPTE 


Pour circulariser tous les clients ayant un chiffre supérieur 
à 50000 F il faut indiquer : A28&B. Dans le cas d’un mailing 
sur les revendeurs ayant un chiffre d'affaire inférieur à 
AO&BO 


10000 F, il convient d'indiquer : 


Enfin, pour un mailing sur les 
grossistes ou les -exportateurs à 
l'exclusion de tout autre, B1/B2 
sera idéal. 


Cette méthode de sélection n'est 
pas courante et l'on peut lui 
préférer les séquences de test du 
type SI LE CHAMP UNTEL = 
QUELQUE CHOSE ALORS... 


La sélection sur attributs est 
remarquable car elle ne laisse 
aucune place à l'interprétation par 
le programme (pour ‘certains 
gestionnaires de fichiers 
Grossistes et Grossiste ne sont 
pas identiques). L'autre avantage 
de cette formule reste la facilité de 
mise en œuvre d'une sélection 
multicritère très poussée (en 


moins d’une heure) modifiable à volonté. 


MAILING - CONNEXION AVEC LOCOSCRIPT 


Là est le véritable point fort de MAILING car sa totale 
compatibilité avec LOCOSCRIPT permet l'impression en 
chaîne de courriers préparés selon une organisation et des 
habitudes déjà connues de tout utilisateur de PCW. 


La personnalisation est enfantine : on rappelle le nom du 


CHANP D TITRE : SPECIALITES 
CORRE NME _] 

FOIR SALE 
BOUDIN VERT 
CHEVALINES 
BOVINES 
CANINES 
MOLAIRES 
PATRS FRAICHES 
PATES DE CAMPAGNE 
BROUETTR TONKINOISE 


Par ? & 4 Sélectionnez la ligne et "EXIT' quand c'est fait. 





Figure 3 
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Vous avez maintenant la possibilité d'inclure ou d'exclure certains enregistrenents en 
donnant leur nunéro respectif et en les séparant par une virgule. Éxenple: 1,4,7 


PE 


Figure 4 





N° de fiches à inclure... 
exclure... 








Exemple : Le signataire, les références, la date limite, etc. 


Pour terminer avec la compatibilité MAILING/LOCOSCRIPT, 
il semble indispensable de signaler que les documents sont 
pris avec leur en-tête et leur bas de page. Donc si le 
document à personnaliser prévoit un logo et une adresse, 
ils sont intégralement restitués (une exception toutefois, il 
semble que le code GRAS ne soit pas reconnu quand il est 
mis dans un en-tête ou un bas de page (pourquoi ? 
mystère !). 


MAILING - EDITION 


champ que l'on met en inversion vidéo par (+1V) et son 


contenu viendra se mettre automatiquement lors de l'édition 
(figure 5). Dans le cas d'informations succeptibles d'être 
modifiées ou n'ayant pas fait l’objet d'une rubrique dans le 
fichier, on dispose de 10 champs optionnels qui sont insérés 
automatiquement si leur nom, créé pour la circonstance, est 


précédé du signe $ (dollar). 


Exemple : Pour dater les courriers à la date de l'édition, on 
prévoit un champ $ DATE en inversion vidéo (ou 
surbrillance). Au moment de l'impression des documents 
personnalisés, MAILING demande le contenu de $DATE et 
l'insère automatiquement dans chaque document (figure 6). 


Cette possibilité est très pratique dans le cas de lettre type 
dans laquelle une ou plusieurs informations sont à modifier 


à chaque impression. 


Si les documents à personnaliser sont créés sous 
LOCOSCRIPT selon la méthode traditionnelle, ils sont édités 
sous le contrôle de MAILING. La condition est que leur nom 
de fichier ait l'extension QMD (ex, LETTRE.QMD). 


Si cette condition est respectée, le reste ne pose aucun 
problème : 


1. On choisit le texte LOCOSCRIPT (quelle que soit la zone 
USER - voir Echo 6) 

2. On choisit le fichier concerné par la personnalisation 

3. On paramètre la fusion des deux, selon le détail suivant : 
- Les attributs de sélection (comme expliqué plus haut) 
- Fiche de départ et d'arrivée (par défaut : de la première à 

la dernière) 

- Les fiches à inclure où à exclure de la fusion 
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Les nouveaux paramètres défi- 


1 Liane L sur 54 nis par IMPSET sont mémori- 

Îi-Modes fB-Blocs EXT sés sur le disque et deviennent 

: é ÿ les paramètres par défaut 

Le SON) IADRE SEE (paramètres par défaut = les 


caractéristiques prises en 
compte si rien d'autre n’est 
ë Le ÿ spécifié) ce qui évite d'avoir à 
les redéfinir à chaque édition. 
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MAILING 
LUE UTILISATION 
L2 ., n [2 e,c L] 
$ NE SANÉE uL).à GENERALE 
Nous, sos nes gerfains que cela, vous germebra.d ausnenter sensiblement votre. “ ll semble indispensable, après 
chafind'offrir.à.votre.clientéle. la.plus.belle.gamne.européenne.de, une telle description, de parler 
.….boudins.nulticolores.e d'un des points les plus mar- 


quants du programme : sa 
simplicité d'utilisation. La tota- 
lité des fonctions de MAILING 
s'organisent autour de menus 
clairs et les manipulations sont 
réduites au strict minimum. 
Rapide, clair et sans bavure on 
le maîtrise rapidement et sans 
compétence particulière. Tou- 
tes les fonctions dangereuses 
(destruction de fiches ou de 
MI: DR fichiers) font l'objet d'une 

ts LIL EE demande de confirmation qui 

ne laisse aucune place au 
hasard en évitant les joies 
incomparables de plusieurs 
mois de saisies réduits à néant 


Fusion d'un texte Locoscript : MAXMMIMN avec fichier : MAMAN par une fausse manipulation. 


En conclusion, on ne peut que 
- féliciter Technical Consultancy 
Non du fichier : RAA) ENV) NN pour l'ingéniosité, la souplesse 
ét Fusion : € Reste: 6 et la rapidité de MAILING qui 
: ! Mergeant : COMPAGAIE est, sans l'ombre d'une hésita- 
ributs ! ti tion, l’un des meilleurs utilitai- 


+ . ien res du moment. D'ailleurs, le 





Figure 5 


4 


Fusion depuis N° 
dysqu' 


à 1e ; club de l'Echo du PCW l'a 
STOP' interrompt la fusion adopté pour gérer ses nom- 


breux membres. N'est-ce pas 
une preuve flagrante ? 


BH D: LOCO 





Figure 6 


4. On lance la fusion et l'édition se 
fait sur l'imprimante. 


De plus, une option permet d'obte- 
nir les étiquettes auto-collantes 
correspondantes aux adresses 
sélectionnées et imprimées lors de 
la fusion (figure 7). 


Mis en node étiquettes continues avec fichier : 


Non du fichier : BMD  NEER 


Pour clore ce chapitre en beauté, il 





re is 
est impératif de signaler qu'un uti- To N. ; . Qui! fat ! ' Rester 7 
litaire destiné à redéfinir tous f ri ; à 

les paramètres d'impressions de 3 

MAILING (IMPSET.COM) est livré ; 

avec le logiciel. 1! concerne tous les ‘D' pour démarrer, ‘C' pour mettre en qualité courrier ou ‘EXIT' 
paramètres de l'écran présenté en 


figure 8. Figure 7 
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- Garder les documents d'origine en 
inscrivant leur date de saisie et en les 


Ce programne 


Hp 


tiné à aodifi ille du 
Pda de Be 


Précisez dans quel lecteur se trouve MAILING: "A', ‘B' ou "RAXIT'A 


ier eb des 
ez le nanue 


Entrez la variable denandée ou "RETURN" pour laisser inchangé. 


Taille papier: en 1/6 de pouce de 9 à 99 ? (RETURN seul pour: 66 ) 
(RETURN seul pour: C } 
Inpression par défaut du fichier: ‘C'ourrier ou ‘L'istins % (RETURN seul pour: L ) 


Choix du papier: ‘C'ontinu ou 'S'iaple feuille ? 


Espacenent étiquettes en 1/6 pouce (9 à 18)? (RETURN seul pour: 


Etiquettes: Nh de signes par ligne (10 à 80)? (RETURN seul pour: 35 ) 
Etiquettes: Entrez le déport en espaces (0-80)? (RETURN seul pour: 
Qualité de fusion par défaut: 'C'ourrier ou ‘L'isting ? (RETURN seul pour: L ) 
Soit: 'R'ecomnencer, 'U'alider les changenents ou "EXIT' pour quitter 4 


Figure 8 


NOTES RELATIVES A LA TRADUCTION 


La version originale de MAILING a été éditée en version 
anglaise sous le titre QMAIL. I! n'est pas impossible de 
trouver QMAIL en France mais il faut noter que seule la 
version française permet l'impression de texte LOCOSCRIPT 
avec la totalité de l’accentuation française que n'autorise 
pas la version anglaise. 


Ce point est important car de nombreux lecteurs nous ont 
fait part de leur problème quant à l’utilisation de version 
importée n'ayant fait l'objet d'aucune traduction et à 
l'encontre de la loi qui oblige tous les constructeurs à fournir 
un manuel français (aussi succint soit-il). Prennez l'habitude 
d'exiger des versions traduites sur lesquelles figurent les 
coordonnées du distributeur français qui en assure le suivi 
technique. (S.A.V. oblige). 


C'est un bon réflexe qui vous évitera bien des surprises. 


CARACTERISTIQUES TECHNIQUES DE MAILING 


NOMBRE DE CHAMPS FIXES : 8 
NOMBRE DE CHAMPS REDEFINISSABLES : 5 
NOMBRE DE CHAMPS LOCOSCRIPT : 10 
CARACTERES PAR CHAMP 50 
CARACTERES PAR NOM DE CHAMP : 20 
CARACTERES PAR NOM DE FICHIER : 8 
CARACTERES PAR TITRE DE FICHIER : 32 
CARACTERES PAR NOM DE DOCUMENTS : 8 
NOMBRE DE FICHES PAR DISC EN LECTEUR A : 1280* 
NOMBRE DE FICHES PAR DISC EN LECTEUR B : 5600* 
NOMBRE D'ATTRIBUTS : 260 


* Ces chiffres correspondent aux nombres maximum sous 
réserve qu'il n'y ait qu'un fichier sur le disque et rien d'autre. 


NOTE RELATIVE 
A LA TENUE D'UN FICHIER IMPORTANT 
Dès qu'un fichier devient important (+ de 300 fiches), il n’est 


pas inutile de le surveiller avec rigueur et quelques règles 
élémentaires le facilitent : 






CHNIQUE 





FICHE TE 


E , 
»°. C 
O &]: SPIN DD. 
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{Hiqueties ainsi 


classant par ordre chronologique. 


- Prévoir un attribut relatif à la date de 
création de la fiche (première saisie) de 
façon à pouvoir distinguer les anciens 
enregistrements des nouveaux. Dans 
de nombreux cas, l'ancienneté des 
fiches n’a plus rien à voir avec la réalité 
et le fichier finit par coûter plus cher 
qu'il ne rapporte (Exemple : Les clients 
d'aujourd'hui ne seront pas forcément 
ceux de demain et une circularisation 
systématique de tout le fichier est une 
perte de temps). 


ontinuer eu 


- Identifier avec précision le destinataire 
du message. À défaut d'un nom, le 
choix d'un service est toujours mieux 
que rien (exemple : comptabilité 
fournisseur, service achat, direction 
générale, etc..). Cette mention à 
d'autant plus de valeur que le destinaire 
est important (grosses sociétés et 
administrations où le courrier arrive 
rarement là où il devrait...). 


9) 


3) 


- Saisir les adresses comme elles ont été obtenues. Ni ajout, 
ni omission et bannir, dans la mesure du possible, les 
abréviations hasardeuses. 


- Editer la totalité du fichier sur listing en continu et pointer 
tous les enregistrements pour vérifier que les informations 
saisies soit logiques mais plus particulièrement éviter les 
doublons (deux fois la même fiche). 


- Si de nouvelles informations concernent une fiche déjà 
saisie, ne pas hésiter à les comparer pour apporter 
d'éventuelle correction. 


- Ne pas hésiter à supprimer toute fiche suspecte d'être 
erronée où non avenue, quitte à la remettre ultèrieurement 
après vérification. 


- Faire de nombreuses sauvegardes mais utiliser toujours le 
même original. Cela évite bien des problèmes (différence de 
contenu entre chaque disquette). Se souvenir qu'un fichier 
doit mériter une surveillance constante et sans faiblesse. Le 
fichier vit, et de sa santé, dépend souvent, la qualité de son 
service. 


BOUDINS & BOUDINS 
Z.1. du CAGEOLAIT 
13004 RARSBILLE Cédex 
Tal 94.29.25.24 - Télex 321292F 


ETS TRIPALAIR ET COMPAGNIE 
545 FASSAGE A TABAC 


68005 MAI 
A L'AITENTION DA Bennieure TRIPALAIR at B1DOYENT 


13 MARS 1987 


Nessieurs, 


Jous ayons le plaisir de vous informer que votre encours pour l'année 87 
est augmenté de 10% et cela, par vos excellents résultats 86 dont le cumul 
s'élève à: 34532094,23 HT... 


Jous eonses certains que cela vous permettra d'augmenter sensiblement votre 
stock afin d'offrir à votre clientèle la plus belle ganne européenne de 
boudins multicolores. 

Dans cet espoir, nos sincères 
salutations. 


nous vous prions d'agréer, Nessieurs, 


La direction, 
Fernand Bréca 


PJ 1 Bchantillon de notre nouveau boudin jaune. 
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MAILING LOCOSCRIPT 


l'écho 


ENFIN UN CLUB ! 


POUR TOUS LES PASSIONNES 
QUI VEULENT TIRER LE MAXIMUM 
DE LEUR MACHINE 


Démarrant ses activités le 1°" Décembre 
1986, le CLUB ECHO DU PCW sera l'indis- 
pensable complément du magazine. 


Les remises accordées par les revendeurs 
« club » ainsi que les logiciels donnés par le 
club doivent permettrent d'amortir très rapi- 
dement le coût de l'inscription. 


Un bulletin mensuel servira de liaison entre 
les adhérents et comprendra toutes les infor- 
mations à caractère urgent (nouveauté, expo- 
sition) mais aussi l'adresse des revendeurs 
« Club » mise à jour, des programmes inédits, 
des trucs et astuces impubliables (par rapport 
à la quantité) ainsi que des informations 
techniques. 


CE QUE VOUS OFFRE LE CLUB 
Dès réception de votre inscription, nous vous 
ferons parvenir 
- Votre carte personnelle d’adhérent 


- Votre code d'accès à votre boîte aux lettres 
personnelle sur le serveur ECHO 


- Un tableur qui est en train de révolutionner 
l'Angleterre est offert par MML aux adhé- 
rents du club (valeur 450 F) 


- La liste des revendeurs « club » de toute la 
France chez qui vous obtiendrez les meilleu- 
res remises. 


TOUTE L'ANNEE 


- Vous recevrez régulièrement votre bulletin 
de liaison. 


- Vous pourrez participer aux stages organi- 
sés par l’'Echo du PCW selon des conditions 
très avantageuses. 


- Vous pourrez utiliser et consulter en toute 
liberté votre boîte aux lettres personnelle sur 
le serveur de l'Echo. 


- Etre invité personnellement à toutes les réu- 
nions ou exposition organisées par l'Echo du 
PCW. 


Pour faire partie des privilégiés du PCW, 
n'attendez-pas, inscrivez-vous pour une 
année au CLUB DE L'ECHO DU PCW et 
retourner le bon ci-dessous à : 
CLUB ECHO DU PCW, LOGI'STICK Edition 
CAPN Le Bonaparte, Boîte 49 
93153 Le Blanc Mesnil Cédex 


=, < RS RE NE E ES 


J'adhère pour une année à compter du  / / 


NOM ne PRENOM : 
ADRESSE : 
TEL. : PROFESSION : 


Tarif pour une année : France 350 F - Etranger 495 F 


au club de l'ECHO DU PCW 


AGE : 





Signature obligatoire : 


Etudiants et chômeurs : France 290 - Etranger DOM TOM 390 F 


(Accompagnez votre inscription du justificatif) 


Règlement par L] Chèque ou L] Mandat à L'ECHO DU PCW 


Commande par la présente : 


ABONNEMENTS D'UNE ANNEE A COMPTER DU NUMERO 8 (11 numéros) SOIT 
ABONNEMENTS D'UNE ANNEE A COMPTER DU NUMERO 8 (11 numéros) SOIT 
DISQUETTES ECHO N° [1] [4] [6] SOIT …. x 80 (FRANCE) 
DisqueTTEs ECHON° L] 2] (sl [] (] SOIT …. x 95 (ETRANGER 
ABONNEMENTS DISQUETTES* A COMPTER DU NUMERO 8 (11 numéros) SOIT …. x 690 (FRANCE) 
ABONNEMENTS DISQUETTES* A COMPTER DU NUMERO 8 (11 numéros) SOIT …. x 900 (ETRANGER 


ANCIENS NUMEROS : [1] (1 ©] C] SOIT x 30 (FRANCE) 
ANCIENS NUMEROS : Li] C2] {3} [4] (s] [se] Cl ] SOIT …… x 40 (ETRANGER) - 


(Entourez les numéros choisis) 
Soit un total de 


SIGNATURE 


(obligatoire) 


290 (FRANCE) 
… x 450 (ETRANGER 











C] CHEQUE* C] MANDAT * l'ECP* 


* Libellez vos règlements à l'ordre de LOGI'STICK Edition 


TOUS CES PRIX SONT NETS ET INCLUENT 
LE PORT ET L'EMBALLAGE 


Retournez à L'ECHO DU PCW - LOG/STICK Edition 
CAPN « LE BONAPARTE » (BOITE 49) 93153 LE BLANC MESNIL CEDEX 


VOTEZ POUR LUI ! 


ARTICLE PASLU TRESMAUVAIS MAUVAIS MOYEN BON TRESBON NOTES 


NOTEZ BIEN, 
NOTEZ MAL 
MAIS VOTEZ ! 


Notez chacun des articles 


NOUVEAUTES E (es CO l [ /20 
INITIATION À DBASE (5) 


que vous avez lu et 
retournez ce 
questionnaire à L'ECHO. 
Chaque mois, l'auteur 
dont l'article a obtenu la 
meilleure moyenne se 
verra attribuer une prime 
de 1000 F et le lecteur 
tiré au sort recevra 

un magnifique 
cadeau-surprise. 


NOM : 


LES LIVRES DE DBASE 
CAHIER TELEMATIQUE 
DELUGES ASCII 

ESSAI MAILING 

LES AVEUX DE Mme LACAILLE 
ATHEMYS 

LES BONS PLANS DE MULTIPLAN 
PRINTER MAKER 3 


_ 


ts TR aan ns A PRENONTS SR CURE Pau nt een nn 


ADRESSES nn RE En Andes tnt tn ae 


AGE : 


Se PROFESSIONS Asia TU UN ns ne 





SERVICE ECHO 


DU PAPIER POUR TOUS ! 


Toujours prêt à rendre les meilleurs services à ses 
lecteurs, l'Echo s'est associé à un imprimeur spécialisé 
pour la fabrication de papier à lettre en continu à en- 
tête et bas de page personnalisés. 


MOINS CHER AVEC L'ECHO ! 


Certain du succès que cette formule va obtenir, L'Echo 
a pu négocier les tarifs les plus bas pour de toutes 
petites quantités par personnalisation. En effet, le prix 
de mille feuilles personnalisées est inférieur à celui 
habituellement pratiqué pour des tirages supérieurs à 
10 000. 


C'est donc un service généralement réservé aux 
grosses entreprises que l'Echo vous propose en avant 
première dans toute la presse informatique. 


COMMENT COMMANDER 
SON PAPIER A LETTRE 


Les spécifications du papier vous sont données plus 
bas. Pour mettre tous les atouts de votre côté, 
préparez votre papier à lettre sur une feuille de brouillon 
en organisant l'emplacement de chaque élément. Pour 
vous aider, nous avons recensé les rubriques qui sont 
les plus courantes et que vous êtes susceptibles 
d'utiliser. Vous pouvez ainsi cocher chaque mention 
de manière à ne pas les oublier dans votre 
personnalisation. Nous vous conseillons de bien vérifier 
leur justesse. 


PARTICULIERS : ENTREPRISES : 

TITRE ENSEIGNE 

NOM (ET PSEUDONYME) ADRESSE COMPLETE 

PRENOM AUTRES ADRESSES (LIVRAISON, 


GOMPTABILITE, ETC) 
TELEPHONE AVEC INDICATIF ET 
GROUPAGE DE LIGNES 
PROFESSION OÙ FONCTION TELEX AVEC REFERENCES 

| EVENTUELLES 


ADRESSE COMPLETE 


TELEPHONE AVEC FAX (TELECOPIE) 

L'INDICATIF SERVEUR AVÉC CODE D'ACCES 

DECORATIONS EVENTUEL 

DIPLOMES REGISTRE DU COMMERCE 

SERVEUR TELEMATIQUE CODE APE 

EMPLOYEUR FORME JURIDIQUE 

ADRESSE SECONDAIRE CAPITAL SOCIAL 

BLASON ET DEVISE NOM DE L'EXPLOITANT OÙ DES 
DIRECTEURS 

TITRES SPORTIFS LOGOTYPE 

AUTRE LISTES EVENTUELLES DES 
PRESTATIONS ET DES 
MARQUES 
MENTIONS PROPRES A VOTRE 
PROFESSION 


AGREMENT AUPRES D'UN 
SYNDICAT PROFESSIONNEL 
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ENTREPRISES (Suite) 
HEURES D'OUVERTURES 
CCP OU COMPTE BANCAIRE 
MESSAGES PUBLICITAIRES 
MENTIONS RELATIVES AU 
DEPOT DE LA MARQUE 
AUTRE 


Cette première opération réalisée, notez sur le bon 
situé au verso ou sur une feuille séparée la totalité des 
mentions et dessins devant apparaître sur votre papier 
à lettre et cela le plus lisiblement possible. Pensez à 
préciser toutes les opérations d'impression, la couleur 
d'impression ainsi que la quantité voulue (minimum 
1000 feuilles). 


POUR ALLER ENCORE PLUS VITE 


Si vous avez déjà un papier à en-tête sur feuille volante, 
vous pouvez l'envoyer directement en précisant les 
mentions à ajouter ou à supprimer et ce que vous 
désirez modifier (emplacement d'un texte, couleur 
d'impression, taille des caractères, etc). 


SPECIFICATIONS 


Imprimé avec un matériel ultra-moderne, le papier en 
continu a un format de 12 pouces et ses micro- 
perforations laissent la feuille totalement nette de 
toutes traces de découpe des feuilles ou des bandes 
de traction, l'option pelure autocopiante permet 
d'imprimer un double sans utilisation de carbone et 
cela en un seul passage. 


UN CADEAU ECHO ! 


indépendamment de la remise offerte aux membres du 
club, les feuilles seront livrées avec les explications 
permettant le paramétrage des programmes les plus 
courants (LOCOSCRIPT, TASWORD) pour une 
utilisation encore plus rationnelle. 


UNE FORMULE QUI A DE L'AVENIR... 


Nous sommes tous conscients de la nouveauté de 
cette formule à travers un journal et nous pensons 
qu'elle séduira la majorité d’entre vous. Si votre 
adhésion est massive, nous poursuivrons la formule 
avec d’autres types d'imprimés personnalisables 
comme les bons de livraisons, factures, bulletins de 
payes, etc. Aidez-nous à innover | 


ET LES PRIX ? 


TARIF TTC (TVA 18,6%) PAR MILLE FEUILLES 
|__| UNECOULEUR | DEUX COULEURS 











SANS PELURE |  499F | 699 F 
AVEC PELURE | 1199F | 1299F | 





PORT PAR TRANSPORTEUR 50 F LE MILLE 


CORRESPONDANCE 


NOUVEAU 


DONNEZ DU PUNCH 
A VOTRE CORRESPONDANCE 


VOTRE PAPIER 
A EN-TETE 


sur listing continu 
avec ou sans pelure 
auto-copiante. 


VOTRE EN-TETE 







4 traits de pliure 


(en option) 
Pour 1000 exemplaires 
en format 12 pouces : 
Carol à A partir de 


micro-perforations 
pour une feuille 
nette 
































VOTRE cadre adresse 
BAS DE PAGE (en option) 
EN-TETE : Choix de la police 
Inscrivez-ici le plus de caractères 
lisiblement possible 
le contenu de votre =] À . 0 
en-tête | 2 A 
: 3 A 
| | 4 LA 
5 LI A 
OPTIONS (sans supplément) : - == : 
TRAIT DE PLIURE [] OUI  [] NON CADRE ADRESSE [] OUI EE] NON 8 si À 
N/REF  V/REF  [] OUI [] NON SIGLE PERSONNALISE [] OUI [] NON 9 Cl 
(nous fournir un modèle) autre : nous fournir un modèle 
BAS DE PAGE : 
1ere ligne | | 
2° ligne l | 
COULEURS D'IMPRESSION : NOIR [] BLEU ROUGE [] VERT [) BISTRE 

















BON DE COMMANDE 
NONPE PRENOM: 
ADRESSE : 


























Commande par la présente x 1000 Exemplaires personnalisés À x ____F + x 50 F (port et emballage) 
SOIT TOTAL DE ______FREGLE PAR [] Chèque  [] mandat SIGNATURE : 
CT joignez une facture avec TVA ressortie. (obligatoire) 
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COMPTABILITE | 


MME LACAILLE PASSE AUX AVEUX... 


Après avoir commenté quelques programmes dont la 
démonstration m'avait été faite par les constructeurs, 
j'ai commis dans l'ECHO 1, 2 et 3 quelques 
appréciations que je ne renierai pas, bien au contraire. 
Puis, la TETE DE L'ECHO, votre « COPYRIGHT 
1959 » a eu l'idée de faire un questionnaire... auquel 
vous avez répondu nombreux. Je tiens ici à vous en 
remercier tous. Vos réponses sont passionnantes et 
ne resteront pas sans suite, au contraire. 


Elles m'ont mise devant les faits : 8 types de questions. 


a) de techniques comptables : je peux y répondre c'est 
certain, mais sous forme de dialogue. 


b) questions techniques concernant les programmes : 
Je crois que les constructeurs ont un service après 
vente si j'ose dire qui « devrait» fonctionner 
normalement... mais j'ai déjà quelques remarques 
à faire à ce sujet. 


c) Utilisation efficace et juste d'un programme, 
QUESTION DE CHOIX comme toujours. VOILA LE 
VRAI PROBLEME : JE PASSE AUX AVEUX. 


J'avais informé les constructeurs que je n'utilisais pas 
moi-même d'ordinateur. Leurs démonstrations étaient 
convaincantes, mais comment répondre à vos 
questions ? 


Notre Rédacteur en Chef me considérait comme une 
demeurée... J'avais beau lui répéter que mon flair 
suffisait. J'ai vite compris qu'il allait bientôt me faire 
rôtir et me manger à la sauce « licenciement » ; 
d'autant que, pour comble, j'utilise l'informatique 
«faite à l'extérieur» depuis plus de 15 ans. 
Impardonnable, j'en conviens, j'avoue et je répare. 
Depuis 6 semaines, j'ai un PCW. J'ai mis en route 
plusieurs comptabilités sur divers programmes. À ce 
jour ALPHASOFT, MEDIACOMPTA et ALIENOR. Je 
ferai de même avec d'autres qui pourraient m'être 
communiquées. 


J'avais prévu de faire la description au jour le jour de 
ces mises en route. À l'usage je n'y trouve aucun 
intérêt. Pourquoi ? Je me remonte le moral en avouant 
(encore) que je suis très intelligente et que rien ne 
m'arrête. J'ai eu d'énormes pépins depuis le début : 
Je vous les éviterai c'est certain mais j'ai pu constater 
que, très vite, la manipulation des programmes devient 
facile, presque une routine et qu'il suffit de partir 
doucement, doucement jusqu'à la certitude. Quitte à 
répertorier en un aide-mémoire les manipulations 
indispensables. J'ai donc décidé d'engager avec vous 
un dialogue. 


Je vous raconterai mon expérience : 


a) les problèmes que j'ai rencontrés : rubrique 
spécialement réservée aux néophytes qui comme 
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moi utilisent un programme et n'ont aucune 
compétence en matière d'informatique. 


b) l'utilisation des programmes. J'espère que vous 
nous ferez part de vos expériences. Nous les 
publierons. J'espère que les constructeurs 
participeront au dialogue. 


c) les choix à faire. Je commenterai dans la mesure 
de mes compétences les questions que contiennent 
vos réponses à notre questionnaire. D'autres, que 
vous voudrez bien nous poser. J'en poserai aussi 
soyez sûrs. Je suis décomplexée et je débute ici. 
Je ne cacherai rien, c'est fini, juré. 


MEDIACOMPTA : Pourquoi les sommes sont-elles 
obligatoirement entrées en anciens francs... Je 
n'arrive pas à comprendre. Cela crée des 
automatismes dont il est bien difficile de se défaire sur 
tout autre programme, sur toute autre machine (à 
calculer par exemple) et quel temps perdu. Réponse 
du constructeur : « C'est le résultat d’une large 
consultation auprès des utilisateurs. » 


Pour terminer, je vous parlerai à l'avenir des livres 
édités sur le sujet qui nous intéresse, sans oublier les 
manuels de programmes. 


Je souhaite cet article annonciateur d'échanges 
POSITIFS. Je souhaite qu'il vous rende prolixes. À vos 
plumes... moi je roule vers les bureaux du R.E.C. bien 
aimé car je vais voler dans les siennes. Je n'ai pas 
encore réussi à faire de copies !1!! kaï ! kaï ! kaï ! ça 
va barder. 


1er cas : avec PIP par l'intermédiaire du programme 
utilisé... scratch, une cassette bousillée avec 9 mois 
de comptabilité. J'appelle le constructeur. || me répond 
« Impossible ».. A voir. 


2° cas : avec DISCKIT et CP/M. Alors là c'est le 
comble. Disquettes neuves, soigneusement 
formatées... rien à faire... l'écran me dit 
systématiquement « copie impossible » « mais sans 
danger heureusement »... sympa non |! J'ai envie 
d'hurler mais j'apporte l'objet du délit et nous aurons 
la réponse. 


3e cas : Lors d’une copie j'ai mis la disquette à copier 
à la place de celle à lire et je me suis mordue les pattes. 
Car là on ne m'a rien refusé tout a été effacé... 
Simple... Pour les nouveaux j'en reparlerai. Pour les 
autres, il paraît que tout le monde passe par là et ça 
les fait rire... 


A suivre. 


MB MME LACAILLE 


COMPTABILITE 


NOUVEAU } 


BASIC ET GRAPHISMES ? 


EXBASIC : LA FIN DES COMPLICATIONS ! 


Plus besoin de se torturer les méninges avec des fichiers dans tous les sens ! EXBASIC adapte les fonctions 
graphiques les plus utiles au BASIC MALLARD et vous programmez vos dessins à l’aide d'instructions claires 
et précises, comme LINE, CIRCLE, DRAW, etc... 





LCL RAULEN LOIRE ER AUIEET:\) Le 2 


Comment sauver l'écran sur disquette pour le récupérer tout aussi simplement en n'importe quelle circonstance 
dans tous vos programmes basic ? SAVE et LOAD suffisent. 

Dessiner point par point, générer des caractères en toutes tailles, sauvegarder des parties d'écran en BASIC 
MALLARD... C'est cela la puissance de EXBASIC ! 


EXBASIC : UNE AUTRE DIMENSION ! 


Une fois lancé, EXBASIC s’ajoute au BASIC MALLARD et vous donne accès à de nouvelles fonctions. 
Livré avec un manuel complet décrivant en détail chacune des nombreuses fonctions de EXBASIC, vos programmes 
prendront une nouvelle dimension qui pourrait même ressembler à la troisième. 
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BASIC ET GRAPHISMES C'EST EXBASIC ! 


EXBASIC est une co-production NABITCHI computing Ltd et LOGI'STICK (c) 86 
Distribution exclusive par D.D.I. 48 67 28 44 + 


RUTLETAUALEI Le] EL TNT NET RE 


En vente chez les meilleurs revendeurs AMSTRAD av prix de 250 F TTC. 


O O OO AZERTY 


cours complet de dactylographie 


pour la maîtrise du clavier Azerty 4 


une méthode unique 
comprenant plus de cent exercices 
progressifs en rythme et en difficulté 


Mettez toutes les chances de votre côté avec AZERTY 
c'est un logiciel LOG/’STICK distribué par D.D.I. 
en vente chez votre revendeur spécialiste PCW 
Renseignements (1) 48.67.28.44 + 


ORDI-PLUS 


LE SPECIALISTE DE L'INFORMATIQUE 
FAMILIALE ET PROFESSIONNELLE 
THOMSON, AMSTRAD, COMMODORE... 


Tous matériels. 
Plus de 1 000 logiciels, jeux, livres. 


Entrée libre - Démonstration permanente 
7, place Camélinat - 93600 AULNA Y-SOUS-BOIS 
Tél. : 48.68.66.33 





EXCLUSIF ! 


UNE COMPTA POUR VOTRE PCW 


Malgré tout l’argent que vous ayez pu gagner avec nos petits programmes 

depuis le n°2 de ce magazine dans lequel je continue à sévir impunément, et aussi 
bien que soient gérés vos stocks grâce à « GESTOCK », la tenue d’une comptabilité 
est obligatoire pour certains et serait préférable pour d’autres. Vous l’avez deviné 

j'en suis sûr, cela sera le sujet de ce mois-ci. 


Je m'en vais donc de ce pas vous présenter « ATHEMYS ». 

Ce programme n’a aucune prétention de vouloir rivaliser avec les programmes 
que l’on trouve dans le commerce mais ce serait, à mon avis, faire preuve de 
mauvaise volonté de ne pas lui trouver quelque utilité. 


PRINCIPE DU PROGRAMME 


Le programme reprend les principes généraux de la 
comptabilité générale. À savoir, une opération doit laisser 
des traces au journal des écritures et au grand-livre. 


Le journal fait apparaître les opérations effectuées par 
l'entreprise dans l'ordre chronologique. Chaque 
opération enregistrée, à une date donnée, est particu- 
larisée par les comptes qu'elle fait intervenir et les 
sommes à affecter à chacun d'eux, celles-ci figurant soit 
au débit (symbolisant l'emploi), soit au crédit (symbolisant 
la ressource). 


Prenons un exemple : 


Une société achète le 12 décembre 1986 des 
marchandises qu'elle règle par chèque. Ces 
marchandises étant assujetties à un taux de TVA de 
18,6%, l'opération se présentera au journal comme suit : 


12/12/86 


607 Achat de marchandises 1000 
44566 | TVA déductible sur autres biens et services 186 
512 Banque 

186 Libellé : Achat à VAN TENGROS Chèque n° 4321 





XX 


D'un point de vue pécuniaire ici, on voit bien que la 
banque avec l'argent qu'il y a sur le compte (bancaire) 
symbolise la ressource pour acheter les marchandises 
qui traduisent l'emploi qui est fait de l'argent crédité du 
compte banque. Le libellé, non obligatoire, est là pour 
apporter si besoin est, quelques précisions sur la nature 
de l'opération. 


À signaler que dans une opération, le total des sommes 
débitées doit toujours être égal au total des sommes 
créditées. 


Voyons maintenant ce par quoi cette opération se traduira 
au grand-livre. On remarque qu'elle fait intervenir trois 
comptes, donc l'état d'autant de comptes devra être 
modifié. En prenant comme méthode la représentation 
des comptes en «T», on aura au grand-livre (les X 
traduisant des opérations antérieures) : 

Débit 


607 Achat de marchandises Crédit 












XX/XX/XX 
12/12/86 


XX/XX/XX 





1000 
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Débit 44566 TVA déductible/ABS Crédit 
12/12/86 186 | XX/XX/XX XXX 
Débit 512 Banque Crédit 
XX/XX/XX XXXXXX XX/XX/XX XXX 
XX/XX/XX XXXX 12/12/66 1186 


SAISIE 


DATE DE L'OPERATION (JJ/M/AA OÙ TAPEZ (RETURN) POUR ARRETER) : ? 15/03/87 
LIBELLE DK L'OPERATION : Paiement KDE CDF 


NUMERO DU CONPTE : ? 447___ 
INTITULE : Autres Inpots Taxes et Versents 


AU DEBIT. 1 OU AU CREDIT 21 


FICHE N° A4 


Y A-T-IL UN AUTRE COMPTE CONCERNE PAR CETTE OPERATION ? (0/N) 


Figure 1 


Ainsi, lorsque vous serez en mode de saisie dans le 
programme (Cf. figure 1), vous devrez tout d'abord 
indiquer la date de l'opération impérativement de la 
forme JJ/MM/AA. Ensuite, vous serez invité à rentrer le 
hbellé. Celui-ci pourra comporter au maximum 40 
caractères. Un trait définira pour la plupart des zones de 
saisie la longueur maximale que peut avoir la donnée 
saisie à titre indicatif. Après avoir saisi ce libellé, un 
masque de saisie apparaîtra. Vous devrez alors rentrer 
le numéro du compte concerné (8 chiffres maximum). Le 
programme recherchera alors dans toutes les opérations 
saisies antérieurement si l'une d'elle a fait intervenir ce 
compte. Si c'est le cas, l'intitulé du compte apparaîtra 
dans la zone réservée à cet effet. Si par contre, ce compte 
lui est inconnu, la mention « CE COMPTE N’EST PAS EN 
MEMOIRE, DONNEZ LUI SON NOM » apparaîtra et vous 
devrez taper son intitulé qui ne pourra dépasser 32 
caractères. Il ne vous restera plus alors qu'à taper le 
montant de la somme qui devra nécessairement être 
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inférieure à 1 million, puis de taper « 1 » pour indiquer 
qu'elle doit être mise au débit ou «2 » pour qu'elle soit 
mise au crédit. 


Une fois cela fait, la question « Y A-T-IL UN AUTRE 
COMPTE CONCERNE PAR CETTE OPERATION ? 
(O/N) » vous sera posée. Dans le cas de l'exemple ci- 
dessus nous devrions répondre « O » (oui) après avoir 
enregistré les comptes 607 et 44566 puis « N » (non) une 
fois que le compte 512 aurait été enregistré. 


Si l'on répond « N »: 


le programme effectue 2 contrôles. Il vérifie que les 
sommes enregistrées au débit sont bien égales aux 
sommes enregistrées au crédit, et aussi qu'au moins deux 
comptes ont été utilisés. Dans ces deux cas, un message 
d'erreur spécifique s'’affichera, l'opération sera annulée 
et vous serez renvoyé au niveau de la saisie de la date 
(bien fait pour vous, on ne triche pas avec son PCW quand 
il se met à faire de la comptabilité !). 


Si l'on répond « O »: 


2 contrôles aussi sont effectués. En effet, pour des raisons 
de volume de fichier dont nous parlerons plus loin, vous 
avez le droit de ne faire intervenir que six comptes dans 
une opération, ce qui est suffisant pour la grande majorité 
des écritures mais qui peut ne pas l'être lors d'écritures 
de régularisation d'inventaire, lorsque l'on doit faire des 
reprises sur amortissements et provisions. Dans ce cas, 
votre opération avec ses six comptes sera enregistrée et 
un message vous demandera de décomposer celle-ci en 
deux. Vous devrez donc à nouveau rentrer la date, puis 
un libellé explicatif mentionnant que cette nouvelle 
opération est en fait hée à celle qui la précède. 


Le deuxième contrôle s'effectuera en fait au moment où 
l'on saisit le numéro du compte suivant : partant du fait 
qu'un compte doit normalement n'apparaître qu'une fois 
dans une opération, le programme vérifiera que ce 
nouveau numéro de compte n'a pas déjà été utilisé dans 
cette opération. Si c'est le cas, un message d'erreur 
s'affichera et l'opération sera annulée. 


Une fois la saisie des opérations terminée, vous pourrez 
alors consulter : 


- le journal des écritures où les opérations apparaîtront 
classées chronologiquement quelque soit l’ordre dans 
lequel elles ont été saisies. Vous verrez donc pour 
chaque opération sa date, les comptes qui la composent 
avec les sommes qui leur sont affectées, soit au débit, 
soit au crédit, et le hbellé en fin d'opération. 


- le grand-livre où pour un compte donné, vous aurez la 
possibilité de visualiser les opérations qui l'ont fait 
intervenir par l'intermédiaire de leurs libellés et les 
sommes prises en compte à chaque fois au débit ou au 
crédit. Le solde du compte vous sera bien sûr indiqué. 
S'il est débiteur (respectvt. créditeur), il figurera dans 
la colonne Débit (respectvt. Crédit). 


Vous aurez bien sûr la possibilité de modifier ou d'annuler 
une opération si vous vous appercevez, par exemple lors 
d'une consultation du journal, que celle-ci est fausse. 


NOTIONS DE FICHIER 


Je vous ai parlé plus haut du volume de fichier. Je vais 
donc vous expliquer le pourquoi de mon propos. 


Question à 1000 francs: pourquoi les longueurs de 
données à saisir sont-elles limitées ? 


Réponse : parce que les données vont être sauvegardées 
dans un fichier à accès aléatoire et que dans un tel fichier, 
les longueurs doivent être fixes et définies une fois pour 
toute. 
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Question : pourquoi utiliser un fichier à accès aléatoire 
plutôt qu'un fichier à accès séquentiel ? 


Réponse : les données d'un fichier séquentiel ne peuvent 
pas être modifiées directement. Il faut, pour pouvoir 
utiliser efficacement un tel fichier, le charger entièrement 
en mémoire. Or la mémoire disponible sous Basic entre 
autre n'est pas extensible à l'infini. D'autre part, modifier 
une donnée (la supprimer, en rajouter une, ou en modifier 
une qui existe déjà) nécessite de lire toutes les données 
qui la précèdent. De plus, si une quelconque modification 
est faite, il est nécessaire de réécrire tout le fichier. 


Pour vous mettre durement en contact avec la réalité, si 
j'avais utilisé un fichier séquentiel pour enregistrer les 
écritures, vous n'auriez pû enregistrer que quarante 
opérations alors qu'avec un fichier aléatoire tel que je l'ai 
défini, vous pourrez y enregistrer 400 opérations. 


Stupéfiant non ? Et pourtant on pourrait même enregistrer 
jusqu'à mille opérations ! En effet, un des avantages de 
ce type de fichier est qu'il ne réside plus en mémoire 
centrale mais sur une mémoire de masse, c'est-à-dire le 
plus souvent la disquette. Mais là aussi, il y a une limite : 
la capacité de cette disquette. A titre d'information, le 
fichier qui contiendra les 400 opérations avoisinera les 
140 Ko. Je vous signale en passant que sa longueur sera 
toujours la même qu'il soit vide ou qu'il contienne 10 ou 
400 enregistrements. Un fichier de ce type a une longueur 
fixe déterminée lors de sa création par la longueur d'un 
enregistrement et par leur nombre. 


Pour simplifier les choses, lors de la saisie d'une 
opération, c'est un enregistrement qui sera rempli. Donc 
dans notre cas il faudra assimiler | opération à 
l'enregistrement. 


Le tableau, ci-dessous, détaille la composition d'un 


enregistrement : 
LONG |COMMENTAIRES 
DATI$ 8 JJ/MM/AA 


LIBELLES NOMS 


Date opération 


Libellé 
opération LIB$ 
Nombre de 


comptes NBC$ 


Numéro 

de compte 
+ NC(D$ 

Intitulé 

du compte 


Répété 6 fois : 
NBC$ indique 

le nombre de 
comptes qui sont 
réellement 
utilisés 





Montant 
du compte 








Longueur d'un enregistrement : 
8 + 40 + 1 + 6 x (8+32+8) = 337 octets 


Nombre d'enregistrements : 400 


d'où VOLUME du fichier : 


337 x 400 soit 134800 octets 
soit 134800 / 1024 = 131,64 Ko 


Donc le fichier, dès sa création, occupera 132 Ko sur votre 
disquette car il sera constitué d'enregistrements vides qui 
prennent autant de place que s'ils étaient pleins. Au fur 
et à mesure du remplissage du fichier, ces chaînes vides 
seront remplacées par les opérations enregistrées. 


Un problème se pose cependant. Il apparaît évident que 
ces enregistrements devront être classés suivant un ordre 
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chronologique et il est impossible de classer les 
enregistrements physiques d'un fichier aléatoire. Un des 
biais consiste à charger ces enregistrements dans un 
tableau en mémoire centrale puis de classer ce tableau. 
Cela donne l'impression d'avoir un fichier classé (en fait, 
il reste tel que sur le disque). Or c'est justement parce 
que cela était impossible que nous avons choisi un fichier 
à accès aléatoire. 


La solution à ce problème réside dans la création d'un 
index qui lui pourra être en mémoire centrale de par le 
petit volume qu'il occupera (4 Ko maximum). 


Voyons maintenant comment sera constitué cet index. 
Puisque le critère de tri sera la date que nous appelerons 
«clef », il sera nécessaire de la trouver dans l'index. 
Chaque date devra correspondre à un numéro 
d'enregistrement dans le fichier principal. Le DOS affecte, 
dans un fichier aléatoire, à chaque enregistrement un 
numéro fixe (dans notre cas, nous irons de 
l'enregistrement n°1 qui sera le premier du fichier, à 
l'enregistrement n°400 qui sera le dernier). 


Il suffit donc dans l'index d'affecter à chaque date le 
numéro de l'enregistrement concerné dans le fichier 
principal. Ainsi à chaque fois que l'on devra ouvrir le 
fichier principal, il sera nécessaire de charger l'index en 
mémoire. Tout ajout, modification, suppression ou 
recherche d'une opération se fera donc à partir de l'index 
qui sera reclassé à chaque fois puis sauvegardé 
automatiquement dès que l'on sortira du programme. 


L'index sera donc un fichier séquentiel de 400 
enregistrements dont chacun se présentera comme suit : 
D(1) +—- date codé numériquement 

de la forme AAMMJ] 
B(1) + n° d'enregistrement (entre 1 et 400). 
I : indice allant de 1 à 400 


Pourquoi coder la date de cette manière ? Pour la bonne 
raison que quelques soient deux dates prises entre 1900 
et 1999, leur transcription sous cette forme les classe 
automatiquement l'une par rapport à l'autre. Prenons un 
exemple : soit le 31 mai 1983 et le 10 décembre 1982. Leur 
codage donnera respectivement 830531 et 821210. Ce 
dernier nombre plus petit que le premier traduit bien 
l'antériorité de la deuxième date par rapport à la 
première. Pas convaincu ? Alors prenons plus subtil : soit 
le 27 janvier 1986 (1) et le 2 juin 1985 (2), (1) antérieur à (2). 


(1) donne 850127, (2) donne 850602 
850127 X 850602 
donc (1) X (2), CQFD 


Voilà, j'espère que ces notions de fichier, qui ont dûes 
être totalement nouvelles pour beaucoup d'entre vous, 
ne vous auront pas parues aussi rébarbatives qu'elles 
l'ont été pour moi la première fois que je les ai abordées. 
Un petit conseil pour essayer de mieux les comprendre : 
jetez des coups d'œil attentifs au listing du programme. 


Voyons maintenant le fonctionnement du programme à 
proprement parlé. 


DEMARRAGE DU PROGRAMME 


Une fois le BASIC installé et après avoir tapé le 
programme (ou après l'avoir chargé en mémoire à partir 
de la disquette par LOAD « ATHEMYS), tapez RUN. 


MENU 
Une fois le RUN tapé, le menu (figure n°2) s'affiche et vous 


propose 8 choix possibles. 
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Identification du fichier 
Ajouter une écriture 
Modifier / Suppriner une Ecriture 


(A) 
(B) 
(C) 
(2) 
(LR) 
CF) 
(GC) 
CH) 


Consultation du Grand Livre 
Consultation du Journal 
Consultation du Plan Conptable 
Changenent de fichier 

Fin 


# Votre choix ? * 


Figure 2 


IDENTIFICATION DU FICHIER (choix [A] 


Il est impératif de passer par cette option avant de pouvoir 
travailler. Il vous faut, en effet, absolument déclarer le 
fichier sur lequel vous désirez travailler. Vous êtes donc 
invité à taper le nom de ce fichier. Ce nom ne devra pas 
dépasser 8 lettres ou caractères. Vous devrez aussi taper 
le nom du drive (A,B, ou M) sur lequel se trouve, ou doit 
se trouver, le fichier (figure n° 2). L'extension de chaque 
fichier aléatoire défini par le programme prendra 
automatiquement l'argument « RND ». Par exemple, si 
vous avez tapé TOTO comme nom, et À comme drive, 
le nom complet du fichier sera : « A:TOTO.RND ». D'autre 
part, l'index est automatiquement déclaré et chargé. Il 
aura pour nom dans cet exemple : « A:'TOTO.IND ». Il a 
donc exactement le même nom que le fichier principal 
sauf son extension qui sera de type « IND ». L'index et le 
fichier aléatoire doivent donc être absolument sur le 
même drive. Dans le cas contraire, le basic renverra un 
message d'erreur. 


IDENTIFICATION DU FICHIER 


RENTREZ LE NON DU FICHIER (8 lettres naxinun) ? ECRITA87 
RENTREZ LE DRIVE SUR LEQUEL SE TROUVE LE FICHIER (A,B,M) : © M 


PATIENTEZ quelques instants, J'OUVRE le FICHIER et je CHARGE L'INDEX 





Figure 3 


Si le fichier n'existe pas encore, votre PCW condescendra 
à vous le signaler et à vous demander si vous voulez le 
créer, ainsi que son index. Sinon, vous reviendrez au 
menu. Si oui, il le fera selon les références tapées 
précédemment c'est-à-dire sous le nom et sur le drive que 
vous aurez tapés. Faites attention lorsque vous créez un 
fichier à ce qu'il y ait suffisamment de place disponible 
sur la disquette que contient le drive choisi (132 + 4 soit 
136 Ko). Vous reviendrez ensuite au menu. 


AJOUTER UNE ECRITURE (choix [B]) 


Les modalités de saisie ayant déjà été expliquées dans 
le paragraphe PRINCIPE DU PROGRAMME, j'espère 
que vous ferez preuve de la plus grande compréhension 
à mon égard si je vous demande de vous y reporter. 
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! 
6728 
M TIDMALE 
è 


A ML NU L628 


ILE LE Un. à 


Figure 4 


REFERENCES FICHIER ; 


N° DE COMPTE DEMANDE : 607 ==) 607 


SOLDE AU 2 Février 1987 


ACHAT BILLETS LOTERIE NATIONALE 
REGLT NMPP Chq N°6767285 

ACHATS S,F.L, 

REGLT NMPP Chq N°6767287 

ACHAT BILLETS LOTERIE NATIONALE 
REGLT NMPP Chq N°6767288 

ACHAT S,F.L, 

ACHAT BILLETS LOTERIE NATIONALE 
Achat HLS 

REGLT NMPP Chq N°6767289 

ACHAT BILLETS LOTERIE NATIONALE 
Achats S,F,L,(avance DSB) 

Achat Disquette d'accompagnenent Livre 
Achats S,F,L, 

REGLT NMPP Chq N°6767290 


05/01/87 
05/01/87 
08/01/87 
12/01/87 
13/01/87 
19/01/87 
20/01/87 
21/01/87 
26/01/87 
26/01/87 
27/01/87 
29/01/87 
31/01/87 
02/02/87 
02/02/87 


==) SOLDE DEBITEUR DE : 
Figure 5 


MODIFIER/SUPPRIMER UNE ECRITURE 
(choix[C]) 


Pour ce faire, vous devez connaître la date 
d'enregistrement de l'opération (vous l'obtiendrez plus 
particulièrement en consultant le journal). Vous taperez 
donc cette date. À partir de celle-ci, le programme 
recherchera dans l'index toute date correspondante puis 
vous affichera l'opération trouvée à la manière du journal 
en vous demandant : « EST-CE CELLE-CI ? (O/N) ». 


Une réponse négative entraînera la recherche de 
l'occurence suivante dans la mesure, bien sûr où elle 
correspond à la date tapée. En cas de recherche 
infructueuse, le programme affiche « OPERATION 
INCONNUE » et, après un petit délai, vous renvoie au 
menu. 


Si par contre vous répondez par l'affirmative, après 
confirmation, vous devrez choisir entre modifier 
l'opération (choix [M]) ou la supprimer (choix [SJ). 


Modifier l'opération vous ramènera au sous-programme 
de saisie auquel cas vous devrez retapez l'opération 
entièrement. 
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M:ECRITA87 ,RND indexé par M:ECRITAS7, IND 


Achat de marchandises 


4282,63 
62,70 
3608,06 
271,00 
4435,43 
96.92 
213,50 
228,90 
5011,28 
347,90 
167,78 


Après la mise à jour du fichier 
principal et un tri de l'index, vous 
vous retrouverez au menu 
principal. 


CONSULTATION DU 
GRAND-LIVRE (choix [D]) 


Après avoir saisi le numéro du 
compte dont vous désirez 
l'édition, un écran tel que celui 
représenté figure n°4, apparaîtra. 
Les opérations concernées qui 


apparaîtront ne seront pas 
seulement celles qui font 
intervenir seul le compte 


27863,80 demandé, mais aussi tous les 
sous-comptes s'y rattachant. Ainsi, 
demander le compte banque 
n° 512 aura aussi pour effet 
d'afficher les opérations, par 
exemple, des comptes 512 et 5122 
qui pourraient représenter la 
Société Générale et le Crédit 
Agricole. Malgré que l'écran se 
passe de commentaires, je vais 
quand même vous préciser que 
les flèches [f] et [}] (haut et bas) du 
pavé numérique vous permettront 
de faire défiler les pages dans les 
deux sens. Le numéro de la page 
où vous vous trouverez est 
indiqué sur la dernière ligne d'en- 
tête. Le solde du compte qui est 
indiqué à la fin de chaque page 
prend en compte l'ensemble des 
opérations qui ont pû faire 
intervenir ce compte. La touche 
[S] vous permettra de sortir de cet 
écran et d'obtenir un état imprimé 
du compte (figure n°5) si vous le 
désirez avant de revenir au menu. 


60,07 


141,27 
4378,01 


23765,95 Francs 
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CONSULTATION 
DU JOURNAL (choix [E]) 


Vous avez ici le choix (figure n°6) 
entre 3 possibilités. Vous pouvez 
obtenir le journal depuis le début 
en tapant directement [RETURN|], 
ou alors à partir d'une date que 
vous rentrerez avant de taper [RETURN]. Si vous avez tapé 
par mégarde sur la touche [E], vous retournerez au menu 
en tapant [M] puis [RETURN]. 


JOURNAL 


- À partir de quelle date ? 08/01/87 


Vous avez 3 réponses possibles : 


1 - Tapez la date de la forne JJ/MW/AA puis (RETURN) 
@ - Tapez (RETURN) pour avoir le journal depuis le début 
3 - Tapez (N) puis (RETURN) pour retourner au nenu 


Figure 6 
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) Fago 


suivante 


E JOURNAL w| 


partir du 08/01/67 


EH ME Ya 


Pop a et Serv 


user : ARS. 
v 


Li ri 


Achat ch _ nt 


au, 


AN 


nrale 


Eaprunt b des absent 


Er he + se 


Figure 7 


Le journal se présente tel que vous pouvez le voir figure 
n°7. Les opérations apparaissent donc classées 
chronologiquement. Vous pourrez changer de page en 
appuyant sur la touche ff]. Avant de retourner au menu 
en appuyant sur [S], le programme vous demandera si 
vous désirez un état imprimé (figure n°8). 


Que ce soit lors de la consultation du journal ou lors de 
celle du grand-livre, le fichier de référence est toujours 
indiqué en bas et à droite de l'en-tête ainsi que sur les 
sorties imprimante. 


CONSULTATION DU PLAN COMPTABLE 
(choix [F]) 


Vous ne pourrez vous servir de cette option que si vous 
commandez la disquette Echo n°7. 
En effet, ne voyez pas là un moyen 
pour nous de vous obliger à acheter 
cette disquette, car c'est bien 
gentiment que votre aimable 
serviteur s'est décarcassé pour 
vous taper les principaux comptes 
du plan comptable dans un fichier 
que vous pourrez consulter. Etant 
donné la masse de données que 
cela représente, il m'était tout à fait 


5) Retour MENU 


# Fichier en cours 





REFERENCES FICHIER 


JOURNAL des opérations enregistrées depuis le 


bonne raison qu'un fichier de 400 
écritures possibles peut ne pas être 
suffisant pour faire tenir la 
comptabilité d'un mois, d'un 
trimestre ou d'un an. 


Vous pourrez donc changer de 
fichier au cours du programme. 
Ce dernier sauvegardera alors le 
fichier en cours et son index sur le 
drive que vous avez indiqué lors de 
l'identification du fichier, puis vous 
demandera les coordonnées du 
nouveau fichier. 


: M:ECRITAG?.RND 


FIN (choix [H]) 


Cette option signifie bien ce qu'elle 
veut dire. Le programme fermera 
donc, après confirmation, le fichier 
et sauvegardera l'index selon les 
mêmes modalités que précedem- 
ment avant de vous rendre la main 
en affichant le sympathique « Ok ». 


Voilà. 


J'espère que votre comptabilité, 
vous, et … votre PCW bien sûr, 
saurez tirer le meilleur parti de ce programme. J'attends 
évidemment toute proposition de votre part qui pourrait 
améliorer ce programme. Je vous laisse sans plus 
attendre astiquer vous doigts et en faire craquer les 
Jontures avant de commencer à taper le listing. 


Bon courage, et attention aux fautes de frappe. 
HO. COQUIN 


NB : Je vous conseille vivement, pour gagner du temps, 
de transférer les fichiers sur lesquels vous travaillez sur 
le drive M :. Ceci pour des raisons de rapidité. Toutefois, 
prenez garde à la fin de votre travail de bien les recopier 
sur une disquette... 


M:ECRITAE7 ,RND indexé par M:ECRITA97, IND 
31/01/87 
DÉBIT 1 


OPERATION l CREDIT 


impossible de les inclure dans le 1 1 : : 1 l 
programme, déjà assez long, sous l RCE SUEDE le in l L 
forme de DATA(Ss). 1 697 1 Achat de sarchandises l 60,07 1] 
1 44566 1 Etat, TVA / Autres Biens et Serv l 1,17 1 
Sachez tout de même que vous 1 53 1 Caisse 1 l 71,24 
pouvez vous procurer ce plan l 1 LIBELLE : Achat Disquette d'acconpagnenent Livre l l 
comptable dans le commerce pour 1 Jens QI/OU/QT ===. 1 1 
une somme modique dans toutes les 1 6453 1 Cotisation à la Caisse de Retrai 1 634,80 1 
bonnes librairies. 1 5122 l Banque Crédit Agricole I 1 634,80 
: A l 1 LIBELLE : REGLT UIRIC 4eme Trin, Chq N°'8011628 l l 
Si vous êtes de ces heureux lecteurs | PASS De oi uite | l 
AA BOsSecent ie desnene sachez L Achat de marchandises L 
que le fichier « PLANCOMP.TAB » s : Re | 26 2€ 
devra toujours se trouver sur le 1 44566 Etat, TVA / Autres Biens et Serv .2 
drive À:. 1LE53 Caisse l l 167,55 
° l } LiBELLE : Achats S,F.L, l l 
1 Jensen O2IO2/BT =" 1 l 
CHANGEMENT 1 6097 L Achat de sarchandises 1 4378,01 1 
DE FICHIER (choix [G]) 1 5122 l Banque Crédit Agricole 1 1 4378.01 
l 1 LIBELLE : REGLT NMPP Chq N°6767290 1 l 


Il vous est possible d'utiliser 
plusieurs fichiers. Ceci pour la 


L'ECHO DU PCW N°7 
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Figure 8 


COMPTABILITÉ 





Most re ot PE ns ot E à ete mon Pr evr VR M nee, de nee D 


10 CKÉRERRERREEREEREEER EEE EEE SERRE EEE EE EEREEERX 


2 ‘+ ATHEMYS ; 
20H nes ; 
40 '# PROGRAMME D'AIDE A LA COMPTABILITE à 
50 ‘+ ENREGISTREMENT DES ECRITURES t 
60 ‘+ SIMULTANEMENT AU JOURNAL & AU GRAND LIVRE + 
0 pense ï 


80 ‘# (C) Olivier COQUIN, 1987 pour L'Echo du PCW * 
30 HR OEEEOOOOEDOOOPOOPOOEOECNOOEOOOOEEEEEEEX 


119 ‘== INITIALISATION 
120 ‘ 

139 ON ERROR 6070 4020 

140 DIM D(400),B(400),NC$(6),A(6) ,NCT#(6) ,LIM(28) 

159 CD$=CHRS(27) :CLS$=CD$+"E"+CD$+"H" : UNS=CD$+" pp" VF$=CD$+"q" 
160 CN$=CD$+"e":CF$=CD$+"{":EFP$=CD$+"J":LF$=CD$+"K": ELNS=CD$+ 
"y": ELF$=C0$+"u" 

170 DEF FNC$(C,L)=CD$+"Y"+CHR$(32+L)+CHR$(32+C) 

184 DEF FNTSCTITS)=CLS$+FNCS((82-LENCTITS))/2,0)+STRINGS(LENIT 
179248, "X")+FACSCCSO-LENCTITS))/2,1)+TITS+FNCS(C82-LENCTITS))/ 
2,2)#STRINGS(LEN(TITS)+8,"4") 

190 DEF FNR$CRI=STRINGS(R,CHR$(95) )+STRINGS(R,CHR$(8) ) 

209 F0$=CD$+"X"+CHRS(32)+CHR$(32)+CHR$(EZ)+CHRS( 121) 

219 F1$=C0$+"K"+CHRS#(39)+CHR$(32)+CHR$(S7)+CHR#( 161) 

220 KOS=STRINGSE63 CHRSC154)):KIS=STRINGSCS4 CHR$(154)):K2$<CH 
R$C150):K3S=STRINGS(E CHRSC154)):KAS=CHRS( ISBD KSS=STRINGS#( 10, 
CHRS(154)):KES=CHRSC156)K7$=CHRS(149) :KB$=CHRS( 151) :KI$=CHRS( 
159):K10$=CHR$(157):KIT$=CHRS(147):K12$=<CHR$(155) 

230 K13$=CHR$( 153): KI4$=STRINGS(87," "}:ANNULS=UNS$+" OPERATION 
ANNULEE "+4VFS USS= "HE HE" 

240 TRS=STRINGS(132,"-")'TPS=STRINGS(87,"="):T$="l"4+SPACES(2): 
US=SPACES(2)+"1" 

250 STL$="1l"4+SPACES(12)+"1"4+SPACES(52)+"1"+SPACES(13)+"1"+SPAC 
E$(13)+"l" 

264 SOULO$=CD$+"-1": COULF$=C0$+"-0":CLT<T OPTION NOT TAB'LPRIN 
T CHR$(15); 

279 G0TO 320 

280 IS=INKEVS: IF 1$="" THEN 269 ELSE I$=UPPER$(I$):AI=ASC(I$): 


319 ‘ 

320 PRINT FOSCLSSCFS:RESTORE 460 

330 LHS=STRINGSC1S CHRSCISA)) PRINT FNCS(36,2):K2$:LH$:K6$ 

340 PRINT FNC$(36,3):K7$" ATHEMYS ":K7$ 

350 PRINT FAC$(26,4):K11$:LHS:K13$ 

360 PRINT FNC#(22,8):K2$:STRINGS(43,CHR$(154)):K6$ 

370 LH$=K7$+SPACES(43)+K7$ 

389 PRINT FAC$(22,93:LH$ 

390 FOR 1=0 TO 7:READ OP1$,0P2$:PRINT FNC$(22,10+241):K7$: SPC 
1h'OPI$:FNCS(60,10+2K1) :0P2$:SPCC1):K7$ PRINT FAC$(22,11+241); 
LH$:NEXT ! 

499 PRINT FNC#(22,26):K11$:STRINGS (42 ,CHR$(154)):K13$ 

410 PRINT FNC$(36,28)"4 Votre choix ? 4" 

42 GOSUB 280:1F AI<6S OR AI )72 THEN 429 ELSE SO=AI-64:PRINT 

CLS: 

430 IF S0=2 AND FICH$="" THEN PRINT FNC$(21,14)"Le fichier et 

l'index n'ont pas été ouverts !1!":GOSUB 3740 :G0T0 320 

449 ON SO GOSUB 520,730,1260,1770,2480,3219,520,3950 

459 GOTO 220 

469 DATA Identification du fichier, { À > Ajouter une écriture, 
{ B) Modifier / Supprimer une Ecriture,€ C »,Consuitation du 

Grand Livre,{ D } 

470 DATA Consultation du Journal, { E } Consultation du Plan Co 


mptable,{ F } 

489 DATA Changement de fichier, € G »,Fin,{ H ) 

498 ‘ 

ND Re nn ner IDENTIFICATION 


529 IF S0=7 THEN 60SUB 3974 

539 MEMORY HIMEM,512,3,337 

549 PRINT FNTSC'IDENTIFICATION OU 
ER") 

559 PRINT FNC$(10,8)CNS"RENTREZ LE NOM OU FICHIER (8 lettres n 
axinun) “ILF$:: INPUT FIC$:IF LEN(FIC$))8 OR FIC$="" THEN 550 
569 PRINT FNC$(10,10):"RENTREZ LE DRIVE SUR LEQUEL SE TROUVE L 
E FICHIER (A,B,M) : ":LFS: INPUT DRVS:IF LENCORVS)>1 OR DRVS=" 
" THEN 569 

579 PRINT CF$:FICH$=DRVS+":"4F1C$+" RND': INDEXS=DRVS+" :"4FICS+ 
“ TND" 

580 IF FIND$(FICH$)="" THEN PRINT FNC#(18,27)"Ce fichier n'exi 
ste pas, Désirez-vous le créer ? (Q/N)":60SUB 284:IF A14>79 TH 
EN RETURN ELSE GOSUE 5599 :G0T0 600 

599 OPEN "R",1,FICH$,337 PRINT FNC$(11,15)"PATIENTEZ quelques 
instants, J'OUVRE le FICHIER et je CHARGE j'INDEX" 

690 FIELD 1,8 AS DATI$,40 AS LIE$,1 AS NBC$,40 AS NC1$,8 AS A1 
5,40 AS NC2$,5 AS A2$,40 AS NC3$,8 AS A3$,49 AS NC4$,8 AS A4S, 
40 AS NC5$,8 AS A5$,40 AS NC6$,8 AS A6$ 

610 FIELD 1,128 AS ENR1$,128 AS ENR2$,21 AS ENR2$ 

624 TOP=1 

630 OPEN "I",#2, INDEXS 

649 FOR I=1 TO 400 

659 INPUT #2,D(I),E(I) 

669 IF TOP THEN IF D(1)=9999991 THEN CLT=I:TOP=4 

679 NEXT I 

689 CLOSE #2 

699 RETURN 


FICHI 


DD Mens SAISIE 


739 PRINT FNT$("S À I S I E") 

740 FOR B=1 TO 409 

750 GET 1,B:IF DATIS$=SPACES(8) THEN 779 
764 NEXT B:GOTO 1150 

779 F=9:0=0:D$="" PRINT FNC$(Q,3)EFPS$:CFS 
784 PRINT FNC$(29,23) "FICHE N°":B 

799 PRINT FNC$(11,5); "DATE DE L'OPERATION (JJ/MM/AA QU TAPEZ € 
RETURN? POUR ARRETER) : "ILFS:FARSCTO)CNS: INPUT "DS: PRINT C 
F$ 

809 IF D$="" THEN 1160 

819 IF LEN(D$){?8 THEN 794 

820 GOSUE 3370:1F D=0 THEN 794 

839 PRINT FNC$(11,7);"LIBELLE DE L'OPERATION : "PRINT FNC$(36 
à T){FNRS(4Q) CN$; LINE INPUT LIBLS 

640 PRINT FNC$(14,1@): "NUMERO OÙ COMPTE :" 

850 PRINT FNC$(14,12);"INTITULE :* 

869 PRINT FNC$(14,16) "MONTANT :" 

870 PRINT FNC$(14,19);"AU DEBIT,,,,,,,.., 1 OÙ 


Au 
rABUT = 


859 FOR J=1 TO 6:NCT#(J)="" A(J)=Q:NEXT J 

890 F=F+1:GOSUE 1180 

909 PRINT FNC#(33,10);LFS:FNR$CTO):CNS: : INPUT NCS:IF LEN(NCS)) 
& THEN 900 ELSE NC$=NCS+SPACES(8-LENCNCS)): PRINT CF$ 

910 FOR J=1 TO CLT-1 

928 GET 1,B(J):G0SUB 3730 

930 FOR K=1 T0 6:IF LEFTS(NCS(K),8)=NC$ THEN NCTS(F)=NCS(K); 
CS=HIDSENCS(K),9):G0TO 978 


AU CREDIT, 


948 NEXT K 

950 NEXT J 

960 PRINT FNC$(25,12):"CE COMPTE N'EST PAS EN MéMOIRE, DONNEZ 
LUI SON NOM :":PRINT FNC$(25,13):"- ":FNR$(32):CNS: LINE INPUT 
CS:NCTS(F)=NCS+C$  G0TO 980 

974 PRINT FNC$(25,12):C$:CN$ 

989 FOR L=1 TO F-] 

990 IF NCTSCL)=NCTS(F) THEN PRINT FNCS(2,25):CF#: "VOUS N'AVE 

£ PAS LE OROIT DE FAIRE FIGURER DEUX FOIS LE MEME COMPTE DANS 

UNE OPERATION" :PRINT FNC$(35,27) :ANNULS :60SUB 3740 :PRINT CN$:6G 

0TO 779 

1090 NEXT L 

1010 FOR J=1 TQ 6:NC$(J)="":NEXT J 

1020 PRINT FNC$(24,16)::INPUT A(F) 

1030 PRINT FNC#(61,19):FNR$(3):: INPUT P 

1040 IF P=2 THEN A(F)=-A(F) 

1050 PRINT FNC$(14,28)CF$:"V A-T-IL UN AUTRE COMPTE CONCERNE P 

AR CETTE OPERATION ? (0/N)":G0SUB 280:1F AI=79 AND F<6 THEN 89 

6 ELSE IF AI<)78 AND AI<)79 THEN 1959 

1060 IF F=6 AND AI=79 THEN PRINT FNC$(16,27):EFP$:"LES SIX COM 

PTES PREVUS POUR UNE OPERATION ONT ETE UTILISES":PRINT FNC$(26 
,29):"DECOMPOSEZ-LA EN PLUSIEURS OPERATIONS" :GOSUB 3749 

1970 IF F=1 THEN PRINT FNC$(9,25)"IL DOIT ABSOLUMENT Y AVOIR U 

NE CONTREPARTIE DANS LE PASSAGE D'ECRITURES"EFPS:PRINT FNC$(35 
, 27): ANNULS :60SUB 3740 :60T0 779 

1089 TOT=0:FOR L=1 TO F:TOT=TOT+A(L):NEXT L'IF TOT{)0 THEN PRI 

NT FNC$(10,26)"LE DEBIT ET LE CREDIT DES SOMMES ENREGISTREES N 

E SONT PAS EQUIVALENTS"EFPS:PRINT FNC$(35,27) :ANNULS:GOSUB 374 

0:G0TO 770 

1090 IF S0=2 THEN DCCLT)=D:B(CLT)=B:CLT=CLT+] 

11004 LSET DATI$=D$:LSET LIB$=LIBLS:LSET NBC$=CHRS(F) 

1110 LSET NCIS=NCTS(1):LSET A1$=MKDSCACT)):LSET NC2$=NCT#(2):L 

SET A2$=MKD$(A(2)) 

1120 LSET NC3S$=NCT$(3) :LSET A3$=MKDS$(A(3)):LSET NCAS=NCTS(4):L 

SET A4$=MKDS(A(4)) 

1130 LSET NCS$=NCTS(S):LSET AS$=MKDS(A(S)):LSET NCES=NCT#(6):L 

SET A6$=MKDS(A(6)) 

1149 PUT 1,8:IF S0=3 THEN RETURN 

1150 IF B)=490 THEN PRINT FNC$(32,30)VN$" DERNIERE FICHE ACCEP 

TEE "VF$ ELSE B=B+1,6ET 1 ,8:IF DATI$C)SPACES(8) THEN 1159 ELSE 
170 

1160 GOSUB 3794 RETURN 

1170 '=emmenmnmannne effacement des zones de saisie 

1180 PRINT FNC$(32,10):LFS$:FNC$(24,12):LFS$ 

1194 PRINT FNC$(0,13):LFS$ 

1200 PRINT FNC$(23,16):LFS$:FNCS(61,19):LFS$ 

1210 PRINT FNC$(9,28):LF$ 

1220 RETURN 


lag} Essen ses esse sesnen nes NODIFICATION 
1259 

1260 NBSUP=9 

1270 MENU=1:0$="":D=0:8=0:C$="" 

1280 PRINT FNTSCSUPPRESSION / MODIFICATI 
0 N') 

1290 PRINT FNC$(13,12):"(da la forme JJ/MM/AA)" 

1390 PRINT FNC$(10,10):"- Quelle est la date de l'opération à 
supprimer ":LFS$:CN$:: INPUT D$:PRINT CF$ 

1310 IF D$="" THEN RETURN 

1320 IF LEN(D$)<>8 THEN 1300 

1330 GOSUB 3374:IF D=0 THEN 1300 

1340 PRINT CLS$CFS:PRINT VN$ | 

1350 PRINT FNC$C0,@)K14$:PRINT FNC$(27,0):K2$:STRINGS(31,CHR$( 


154)):K6$ 

1360 PRINT FNCS(0,L)KI4$:PRINT FNCS$(27,1):K78" $ÿ SUPPRE 
SSION $## "K7$ 

1370 PRINT FNC$(0,2):STRINGS(87,"-"):PRINT FNC$(26,2):" ":K11$ 
:STRINGS(31,CHR$(154)):K13$:" " 

1380 PRINT FNC$(0,3)K14$ 

1390 PRINT FNC$(1,3):"# Date de l'opération à suppriner: ":D$: 
!PRINT FNC$(51,3)"4 Fichier en cours : ":FICH$:VF$ 

1406 PRINT FNC$(0,4):K2$:K38:K4$:K1$:K4$:K5$:K48:K5$:K6$ 

1410 PRINT FNC$(0,5):K7$" COMPTE "K7$:SPC(22) : "OPERATIONS" : SPC 
(22):K7$:SPC(3)"DEBIT'SPC(2),K7$:SPC(2)"CREDIT"SPC(2);K7$ 

1428 PRINT FNCS(0,6):K8$:K35:K98:K1$:K9$:K5S:K9$:K5$:K10$ 

1430 FOR I=1 TO CLT-1 

1449 IF D(1))D THEN 1610 

1450 IF DCI)<D THEN 1600 

1460 GET 1,B(1):@0SUB 3720 

1470 PRINT F1$:CLS$ 

1480 PRINT FI$:FNCS(0,0):K7$:SPC(8):K7$:STRINGS(22,"-")" "DA 
114$" "STRINGS(22,"-")K7$:SPC(10):K7$:SPC(10):K7$ 

1490 FOR F=1 TO ASC(NBCS) :NCS=NCSCF) 

1590 KA=6S:KB$=SPACES(2):IF A(F)<Q THEN XA=76:XB$=SPACES(1 

2) 

1510 PRINT FISFNCS(9,F)K7S$:LEFTS(NCS,8):K7$: XB$:MIDS(NCS,9 
)'SPCC22-LENCKBS)):K7$:SPCC18):K7$:SPCC10) :K7S:PRINT FIS$FNCS(X 

ÀA,F):USING US$: ABSCA(F)) 

1520 NEXTF 

1530 PRINT FI$:FNC$(0,F),K7$:SPC(8):K7$"LIBELLE : ":LIB$; 
1540 PRINT SPC(4):K7$,SPC(10):K7$:SPCC10):K7$ 

1550 PRINT FIS:FNCS(Q,F+1):K11$:K38:K128:K18:K12$:K5$:K12$; 
1560 PRINT FI$:FNCS(76,F+1),K5$:K13$ 

1579 PRINT FI$:FNC$(34,21):"EST-CE CELLE-CI ? (O/N)" 

1580  GOSUB 280:IF A1=79 THEN 1620 

1590 IF A1I<)78 THEN 1580 

1600 NEXT I 

1610 PRINT FNC#(29,23):VN$:" CETTE OPERATION M'EST INCONNUE "; 
VF$:60SUB 3749:607T0 1680 

1620 PRINT FNC#(32,23):VN$:" EN ETES-VQUS SUR ? (O/N) ":VF$ 
1630 GOSUB 280:1F A1=78 THEN 1600 ELSE IF AI<>79 THEN 1630 
1640 PRINT FO$:CLS$:FNCS(38,2) "Voulez-vous, ,"'FNC$(35,B)"< M 
) La modifier ?"::PRINT FNC$(35,10)"€ S } La supprimer ?" 

1650 AI=0:UHILE Ch1<)77 AND AI()83):60SUB 280 :WEND 

1660 IF A1=83 THEN D(I)=111111! 

1679 IF A1=77 THEN B=B(I) PRINT CLS$:G0SUB 770:D(1)=D 

1680 PRINT FO$:CLS$:FNC$(14,5)"VOULEZ-VOUS MODIFIER OU SUPPRIN 
ER UNE AUTRE OPERATION ? (O/N)" 

1699 GOSUB 280:IF AI=79 THEN 1270 

1700 FOR I=1 TO CLT-1 

1718 IF D(1)=111111! THEN LSET ENRI$="":LSET ENR2$="":LSET ENR 
3$="":0(1)=9999991 :PUT 1,B(1):BC1)=0 :NBSUP=NBSUP+1 

1720 NEXT L':CLT=CLT-NBSUP 

1730 GOSUB 3799 :NBSUP=Q : RETURN 


(GO =" GRAND LIVRE 


1770 C$="" 

1780 PRINT FNT$SC"GR AND LIVRE");CN$ 

1790-PRINT FNC$(10,10)"DE QUEL COMPTE (N°) DESIREZ-VOUS L'EDIT 
ION ":LFS:: INPUT NC$:IF LENCNCS))8 OR MIDS(STRS(VALCNCS)),2)€) 
NC$ THEN 1790 

1800 PRINT CF#; 

1810 S=0:B=1:M1=0 

1820 FOR 1=1 TO CLT-1 

1830 GET 1,B(1),60SUB 3720 


1840 FOR F=1 TO ASC(NBCS) 

1859 IF LEFTS(NCSCF) ,LENCNCS))=NCS THEN S=S+A(F):MI=M1+1 M 

2=M1/20:IF INT(M2)=M2 THEN LIMCM2)2I 

1869 IF LEFTS(NCS(F),8)=NC$+SPACES(B-LENCNCS)) THEN C$=NCS 
(F) 

1870 NEXTF 

1880 NEXT I 

1899 IF INT(M2)C)M2 THEN NBLIM=INT(M2)+1:LIM(NBLIM)2CLT-1 ELSE 
NBLIM=N2 

1908 IF C$="" AND S<)@ THEN C$="PAS DE COMPTE, MAIS AU - 1 SOU 

S-COMPTE" 

19106 IF C$="" AND S=0 THEN C$="COMPTE +SS-COMPTES &VENTUELS IN 

EXISTANTS" 

1928 J=1:LIM(@)<0 

1930 PRINT CLS$:PRINT VN$ 

1940 PRINT FNC$(0,0)K14$:PRINT FNC#(27,0):K2$:STRING$ (31, CHRS( 
154)):K6$ 

1950 PRINT FNCS(0,1KIA4S:PRINT FNC$(27,1):K7$:" #4 GRAND 

- LIVRE #H":K7$ 

1968 PRINT FNC$(1,1):"<"CD$CHR$#(9)"> Page précédente": PRINT F 

NC$C1,0);"<"CHR$(94)") Page suivante": :PRINT FNC$(71,1)"€S) Re 

tour MENU“ 

1970 PRINT FNC$(0,2);STRINGS(87,"-") PRINT FNC$(26,2);" ":K11$ 
!STRINGS(31,CHRS(154)):K13$:" " 

1980 PRINT FNC$(0,33K14$ 

1998 PRINT FNC#C1,3):"CPTE N° ":LEFTS(CS,49): «PRINT FNCS(52,3) 
!"Page": PRINT FNC$(63,3)'"Fichier : ":FICH$:VFS 

2000 PRINT FNC$(0,4):K28:K3$:K4$:KIS:KAS:K5S KA: KSS:K6S$ 

2010 PRINT FNC$C0,5):K7$SPC(2)"DATE"SPC(2)K7$:SPC(23) :"LIBELLE 
S":SPC(23):K7$SPC(3)"DEBIT'SPC(2) :K7$SPC(2)"CREDIT"SPC(2)K7$ 
2020 PRINT FNC$(0,6):K8$:K3$:K9$:K1S:K9S:K5$:K9$:K5$:K10$ 

2030 I=T:PRINT FO$:FNC#C57,3):VN$:J:VF$ 

2040 FOR E=LIM(J-1)+1 TO LIM(J) 

2050 GET 1,B(E):GOSUB 3720 

2460 FOR F=1 TO ASC(NBCS$) 

2070 IF LEFTS(NCS(F),LENCNCS))NC$ THEN 2110 

2088 KA=66:IF ACF)0 THEN XA=76 

2090 PRINT FISFNCS#(Q,(1-1))K7$:DATI$:K7$:SPC(2)LIBS$:SPC(| 
2):K7$:SPC(10) :K7$ SPCC1O) :K7S PRINT FISFNCS(XA,(1-1)) USING U 
S$:ABS(A(F)) 

2100 =1+1 

2110 ONEXTF 

2120 NEXT E 

2130 PRINT FIS:FNCS(0,1-1):KB$:K38:K128:K1$:K9$:K5$:K9$: : PRINT 
FI$:FNCS(76, 1-1) KS$:K10$ 

2140 XA=6S:IF S<Q THEN XA=76 

2150 PRINT FISFNCS(0,1):K7$:"X3X SOLDE À CE JOUR #XX"SPC(40):K 
T$:SPCC1O):K7$ SPCCIO):K7S PRINT FISFNCS(XA, I) USING US$: ABSCS 

) 

2160 PRINT FIS:FNC#(0,1+1):K11$:K0$:K12$:K5$:K128:: PRINT F1$:F 
NC$(76,[+1): KG$: :K13$; EFPS 

2170 GOSUE 280: IF 41083 AND AI<31 AND AI<)30 THEN 2170 

2180 IF AI=83 THEN 2228 

2190 IF A1=30 THEN IF J=1 THEN J=NBLIM ELSE J=J-1 

2200 IF A1=31 THEN IF J=NBLIM THEN J=1 ELSE J=J+] 

2210 GO0TO 2030 

2220 PRINT FO$CLS$ 

2230 PRINT FNC$(18,5): "VOULEZ-VOUS UNE SORTIE COMPLETE SUR IMP 
RIMANTE ? (O/N)" 

2240 GOSUB 280:1F A1=78 THEN 2430 ELSE IF AI<379 THEN 2240 
2258 ‘= mmmmmmmnmnmmns sms edition complete 

2260 PRINT FNC$(10,9):"RENTREZ LA DATE OU JOUR : ":CN$: : INPUT 
D$:PRINT CF$ 


2270 6OSUB 3750:LPRINT SPC(28)"N° DE COMPTE DEMANDE : ":NC$:" 
==) M'CSLPRINT 

2280 LPRINT SPC(48)"SOLDE AU ":DS:LPRINT:LPRINT SPC(22):TP$ 
2290 LPRINT SPC(22)T$SPC(2)"DATE"SPC(2)USSPC(18)"LIBELLES"SPC( 
18)T$SPC(2)"DEBIT'SPC(2)U$SPC(3)"CREDIT"SPC(2)US'LPRINT SPC(22 
):TP$ 

2300 FOR E=1 TO CLT-] 

2310 GET 1,B(E):G0SUB 3720 

2320 FOR F=1 TO ASC(NBCS) 

2330 IF LEFTS(NCS(F),LENCNCS))NCS THEN 2370 

2340 LPRINT SPC(22):T$:DATIS US$: SPCI2):LIBS;U4: SPCC1): 

2350 IF ACF)>=0 THEN LPRINT USING US$:A(F); :LPRINT U$:SPC( 
RAI 

2360 IF ACF)<Q THEN LPRINT SPCUIO)USSPC(1) USING US$: ABS(A 
(F)):LPRINT U$ 

2370 NEXTF 

2380 NEXT E 

2390 LPRINT SPC(22):TP$:LPRINT 

2400 SD$="DEBITEUR":IF S<Q THEN SD$="CREDITEUR" 

2410 LPRINT SPC(43);"=2==) SOLDE ":SD$:" DE : "USING US$ ABS 

SG): LPRINT " Francs" 

2420 LPRINT SPCCIS):TR$:PRINT CLS$ 

2430 PRINT FNC$(22,8): "VOULEZ-VOUS CONSULTER UN AUTRE COMPTE ? 

(Q/N)" 

2440 GOSUB 289:IF AI=79 THEN 1770 ELSE RETURN 

2450 ‘ 

260 ‘ses een n sn ee JOURNAL 
2470 ‘ 

2489 MENU=9:D$="":D=0:C$="" 

2490 PRINT FNT$("J OUR N A L") 

2500 PRINT FNC$(29,17)"Vous avez 3 réponses possibles :" 

2519 PRINT FNC$(18,20):"1 - Tapez la date de la forme JJ/MM/AA 
puis RETURN)" 

2520 PRINT FNC$(18,22)"2 - Tapez 4RETURN> pour avoir le journa 
1 depuis le début" 

2530 PRINT FNC$(18,24)"3 - Tapez €M) puis <RETURN> pour retour 

ner au menu" 

2540 PRINT FNC$(10,10):"- À partir de quelle date ":LFS$'CN$::I 

NPUT D$:PRINT CF$ 

2550 IF D$="" THEN D$="Oébut du journal":GOTO 2628 

2560 IF UPPER$(D$)="M" THEN RETURN 

2570 IF LEN(D$)<>8 THEN 2540 

2580 GOSUB 3370 :IF D=0 THEN 2540 

2590 FOR E=1 TO CLT-] 

2600 IF D(E)>=D THEN LIMI=E:60T0 2630 

2610 NEXT E 

2620 LIMI=1:IF D)D(CLT-1) THEN LIMI=CLT 

2630 PRINT CLS$CFS:PRINT VN$ 

2640 PRINT FNC$(0,4)K14$:PRINT FNCS(31,0):K2$:STRINGS(23,CHRS( 
154)):K6$ 

2650 PRINT FNC$(D,1)KI4S:PRINT FNCS(31,1):K7$" #$ JOURNA 
L' XX "K7$ 

2668 PRINT FNC$(7,1):"<"CHR$(94)") Page suivante" 
65,1)"<S) Retour MENU" 

2670 PRINT FNC$(0,2):STRINGS(87,"-"):PRINT FNC$(39,2):" ":KI1$ 
ISTRINGS(23,CHR$(154)):K19$:" " 

2680 PRINT FNC$(0,3)K14$ 

2698 PRINT FNC$(1,3):"# Opérations à partir du ":D$::PRINT FNC 
$(51,3)"# Fichier en cours : ":FICHS:VF$ 

2700 PRINT FNC$(0,4):K2$:K3$:K4$:K1S:KA4S K5S KA4S KSS:K6S$ 

2710 PRINT FNC$(0,5):K7$" COMPTE "K7$:SPC(22) ; "OPERATIONS" : SPC 
(22) K7$:SPC(3)"DEBIT'SPC(2):K7$:SPC(2)"CREDIT"SPC(2) :K7$ 

2720 PRINT FNCS(9,6):K8$:K3$:K9S:K1$:K9$:K5S:K9$:K5$:K10$ 


"PRINT FNCS( 





2730 PRINT F1$:CLS$ 

2740 VWHILE MENU<>83 

2750 I=-1 

2760 FOR E=LIMT TO CLT-1 

2770 GET 1,B(E):GOSUB 3729 

2780 GOSUB 3130:1F MENU=83 THEN 2680 ELSE PRINT FI$:FNC$(0,I 
DK78:SPCCB):K7$STRINGS(22,"-")" "DATI$" "STRINGS(22,"-")K7$: 

SPCCTO) K7$:SPCC19):K7$ 

2799 FOR F=1 TO ASC(NECS) 

2890 GOSUB 3130:IF MENU=83 THEN 2980 ELSE NC$=NC$(F) 

2810 KA=65:XES$=SPACES(2):IF A(F)<Q THEN XA=76:B$=SPACES (1 

2) 

2520 PRINT FISFNCS(0,D)K7$:LEFTS(NCS,8):K7$:XB$:MIDS(NCS,9 
):SPCI22-LENCBS)):K7$:SPCC10) :K7$:SPCC1O):K7S: PRINT FISFNCS(X 

À, LD) USING US$:ABS(A(F )) 

2330 NEXTF 

2840 GOSUB 3130:IF MENU=83 THEN 2889 ELSE PRINT FI$:FNC$#(O I 
D'K7$:GPCC8):K7$:"LIBELLE : "'LIBS:SPC(4) K7$:SPC(10):K7$ SPC 
19):K7$ 

2850 NEXT E 

2860 GOSUB 3130:IF MENU=83 THEN 2990 ELSE PRINT FI$:FNC$(9 1): 

KITS IKASIKTAS KITS IKI28 KS$ 128: PRINT FIS$:FNCS(76,1):K5$:K138 
:EFP$:1=23:GOSUB 3130 

2870 WEND 

2380 PRINT FA$CLS$ 

2890 PRINT FNC$(18,5):"VOULEZ-VOUS UNE SORTIE COMPLETE SUR IMF 

RIMANTE ? (O/N)" 

2900 GOSUB 280:IF A1=78 THEN RETURN ELSE IF AI<)79 THEN 2999 

2919 l=esmessnmnnnssssemensonnasne edition complete 

2920 GOSUB 3754 

2930 LPRINT SPC(38) "JOURNAL des opérations enregistrées depuis 
le ":D$:LPRINT 

1940 LPRINT SPC(18):SOULOS:STRING$C96," "):SOULFS 

2950 LPRINT SPC(I8)STLS 

2960 LPRINT SPCCIE)USSPC(3)"COMPTE"SPC(3)T$SPC(20)"OPERATION"S 

PCC20)USSPC(4)"DEBIT'SPC(4)T$SPC(2) "CREDIT" SPC(1 )U$ 

2970 LPRINT SPC(18)S0ULOS :STL$: SOULF$ 

2989 LPRINT SPCIIB)STLS 

2990 FOR E=LIMI TO CLT-1 

3000 GET 1,B(E):G0SUB 3720 

3910  LPRINT SPC(TE)USSPCCTO)USSTRINGS(21,"-")" "DATI$" "STRI 

NG$(22,"-")TSSPC(USSPCC TT US 

9020 FOR F=1 T0 ASCINECS$) 

3030 NCS=NCS(F) 

3040 KE$="":IF A(F){0 THEN XBS$=SPACES(6) 

3050 LPRINT SPCOIE)USSPC(2)LEFTS(NCS, 8 USSPC(2)KB$MIDS(NCS 
,3)SPC(17-LENCABS) )USSPC( 1); 

3060 IF A(F)>=0 THEN LPRINT USING US$'A(F)::LPRINT US$SPC(1 
Du$ 

3070 IF ACF)<Q THEN LPRINT SPC(IO)USSPC(1) USING US$: ABSCA 
F)): 'LPRINT U$ 

3980 NEXTF 

2099  LPRINT SPCCIE)USSPC(12)"1 LIBELLE : "LIBSUSSPC( 11 )US$SPC 
(IDUS 

3109 NEXT E 

3110 LPRINT SPC(18): SOULO$:STL$: SOULFS$:LPRINT TRS 

31209 RETURN 

3130 IF I<23 THEN I=I+1:RETURN 

3140 1=0 

3150 GOSUB 280 :IF AI()31 AND AI<)83 THEN 3159 

3160 IF AÏ=03 THEN MENU=AI 

3170 RETURN 

3180 ‘ 


SI ateermemnnestenansse CONSULTATION DU PLAN COMPTABLE 


3210 PRINT FNT$C"PLAN COMPTABLE") 
3220 IF FIND$("A:PLANCOMP,TAB")C)"" THEN 3249 ELSE PRINT FNC$( 
27,29)" R >econmencer -k-X-X- € À >nnuler":PRINT FNC$(8,28)"L 
À DISQUETTE CONTENANT LE FICHIER PLANCOMP,TAB N'EST PAS DANS L 
E DRIVE A:" 
3230 GOSUB 280:1F A1<)82 AND A1€)65 THEN 3230 ELSE IF A1=82 TH 
EN PRINT CD$"M":G0TO 3226 ELSE RETURN 
3240 OPEN "R",3,"A!PLANCOMP ,TAB",51 
3266 FIELD 3,6 AS AA$,45 AS PES 
3260 Y=5 
3270 FOR I=1 TO 259 
3280 GET 3,1 
3290 PRINT FNC$(20,Y);AAS:PRINT FNC$(27,Y):BBS$:Y=Y+1 
3300 IF Y=25 OR 1=259 THEN PRINT FNC#(32,29)"€ S huite -k-#- 
X- € M )enu":GOSUB 280:1F AÏ=77 THEN 3220 
ELSE Y=5'PRINT FNC$(0,3)EFP$ 
3319 NEXT I 
3320 CLOSE 3 
3329 RETURN 


9950 ‘=. CONTROLE DE LA DATE 


3370 D3$=RIGHT$(0$,2):02$=MI0$(D$ ,4,2) DIS=LEFT$(D$,2) 

3380 AA=VAL(D3$):MM=VAL(D2$): JJ=VAL(D1$) 

3390 IF AA<30 OR AA>99 THEN RETURN 

3400 IF MM<1 OR MM>12 THEN 3469 

3410 IF JJX1 OR JJ>31 THEN 3469 

3420 IF (MM=4 OR MM=6 OR MM=9 OR MM=11) AND JJ)30 THEN 3469 
3430 IF MM=2 AND JJ329 THEN 3460 

3440 IF MM=2 AND JJ=29 AND INT(AA/4)C)AA/4 THEN 3460 

3450 D=VAL(D3$+026+D1$) 

3450 RETURN 


JAOQ'T SET es ment Reese nee se CREATION DU FICHIER 
3490 ‘ 

3500 FLAG=1 

3510 PRINT FNC$C15 20) "PATIENTEZ quelques instants je crée le 
fichier et l'index"EFP$ 

3529 OPEN "R",1,FICH$,337 

3630 FIELD 1,128 AS ENR1$,128 AS ENR2$,81 AS ENR2$ 

3540 LSET ENR2$=""LSET ENR9$="":LSET ENR1$="" 

3550 FOR A=1 TO 409 

3566 PUT 1, 

3570 NEXT À 

3590 ‘-------"--- CREATION OU SAUVEGARDE DE L'INDEX 
3590 IF INDEX$="" THEN RETURN 

3600 IF FLAG=Q THEN PRINT FNC$(14,20)"Quelques secondes SVP, 
, Je Sauvegarde L'INDEX sur le DRIVE "DRVS 

3619 OPEN "O",#2,INDEKS 

2620 FOR J=1 T0 409 

3630 IF FLAG THEN D(J)=9999991 

3640 WRITE #2,0(j),B(J) 

3650 NEXT J 

3660 CLOSE #2 

3670 FLAG=9 

3680 RETURN 


D7QD Mmes SQUS-PG DIVERS 
3710 ‘ 
3720 ACT=CVD(A1S) :AC2 


=CVD(A2$):A(3)=CVD(ASS) AC4)=CVDCA4#) À 
(S)=CVD(AS$) :A(G)=CVD(AGS 


} 
A6$) 





3730 NCSCT)=NCIS:NCS(2)=NC2$:NCSCZ)=NCIS  NCSCA)=NCAS NCSCS)=ENC 


5$:NC$C6)=NCES : RETURN 
3740 FOR K=1 TO 4000:NEXT K:RETURN 


3750 LPRINT TR$:LPRINT:LPRINT SPC(3S)"REFERENCES FICHIER : "FI 


CH$" indexé par "INDEKS$:LPRINT:RETURN 
3760 ‘ 


RS a NE TRI DE L'INDEX 


3780 ‘ 


3790 FRINT FNC$(24,20)"PATIENTEZ quelques instants je TRI l'in 


dex"EFP$ 

3804 N=CLT+NBSUB 

3810 ECART=N 

3820 ECART=INT(ECART/2):1F ECART(I THEN RETURN 
3830 J=1:K=N-ECART 

3840 I=J 

9850 L=I+ECART 

3860 IF D(I){=D(L) THEN 3900 

3870 SUAP DIT), D(L):SUAP BCI),B(L) 
3880 I=I-ECART:IF I<1 THEN 3909 
3890 GOTO 3850 

3990 J=J+1:1F J>K THEN 3829 

3910 G0TO 3840 


3950 PRINT CLSS$:FNC$(20,12);"ETES-VOUS SUR DE VOULOIR SORTIR D 


U PROGRAMME (0/N)":G0SUB 280 
3960 IF AI(279 THEN RETURN 


3976 IF INDEXS{2"" THEN PRINT CLES:FNC$(15,16)"Je ferme le fic 


hier "FICS$",RND qui se trouve sur le DRIVE "DRVS 


3980 CLOSE :60SUB 3590:1F S0=7 THEN RETURN ELSE PRINT. CLS$CNS:L 


PRINT CHR$(18) END 
3990 


4000 1" """" TRAITEMENT D'ERREUR 


4020 PRINT'ERREUR NUMERO" :ERR:" LIGNE":ERLDERR'GOSUE 2749 
4030 RESUME NEXT 


GAGNER DU TEMPS 
AVEC MULTIPLAN 


Comment organiser ses disquettes 
pour utiliser Multiplan 
de manière plus rationnelle. 


Le logiciel MULTIPLAN se présente sous deux versions que 
rien, à priori, ne permet de distinguer : elles portent toutes 
deux le numéro 1.06. 


La première version dispose d'une fonction de déplacement 
rapide du curseur dans la feuille de calcul. Cette fonction 
est obtenue en faisant précéder la pression sur une touche 
de curseur d'un appui sur RELAY (ou sur ALT+R). Hélas, 
cette version n'exploite pas la totalité de l'écran du PCW. 
De plus, elle est affhgée d'un bug (le bug est un terme anglais 
qui désigne un insecte et qui, par extension, est devenu 
synonyme d'erreur de programmation, la traduction littérale 
est bogue) ; la fonction Encadre Fenêtre donne lieu à un 
affichage bourré de caractères parasites (des puces 
probablement ! NDLR). 


Dans la seconde version, distribuée de façon un peu 
confidentielle (si vous ne l'avez pas, demandez la gentiment 
à votre revendeur), notre cher écran de 32 lignes sur 90 
colonnes est entièrement utilisé. Le bug a disparu et les 
fenêtres peuvent s'orner de superbes encadrements 
Malheureusement, la fonction Déplacement Rapide a 
mystérieusement disparu et la touche RELAY (ou ALT+R) 
provoque les maulements intempestifs du bip du PCW. 


Cruelle alternative ! Quand on a goûté à la lenteur de gestion 
d'écran sous MULTIPLAN et de déplacements de curseur 
dans des feuilles de calculs importantes, il y avait de quoi 
s'arracher les cheveux. 


FICHIER DE REDEFINITION DE CLAVIER 
KEYS.MP. 


Plutôt que d'attendre que MICROSOFT concocte une 
troisième version de son logiciel, nous avons créé un fichier 
de redéfiniion de clavier dans le but de pallier à cet 
inconvénient. Les utilisateurs de LOCOSCRIPT apprécieront 
de retrouver les fonctions de déplacement du curseur dans 
les commandes sous la touche CHAR, qui leur est familière 
et de garder le réflexe d'appuyer simultanément sur ALT 
pour avoir le déplacement inverse. 


Quelques fonctions pré-programmées sont accessibles par 
la pression d'une seule combinaison de touches. En 
particulier, 1l est possible d'accéder directement aux quatre 
cons de la feuille ou au début de la ligne ou de la colonne 
suivante en vue d'effectuer une saisie en lignes où en 
colonnes 


D'autres combinaisons de touches (EXTRA + A et EXTRA +B) 
permettent d'intialiser le lecteur sur lequel se trouvent les 
fichiers de travail et d'en afficher le catalogue. Pour charger 
un fichier, il suffit alors de déplacer le curseur au moyen des 
flèches jusqu'au fichier désiré et de frapper RETURN. Par 
la même occasion, l'option Recalcul Automatique est nhibée, 
ce qui permet un gain de temps appréciable lors de la saisie 
de longues séries de nombres. Notez que le recalcul de toute 
la feuille peut être obtenu à tout moment en tapant sur «!». 


Enfin, MULTIPLAN étant un logiciel francisé, il n'accepte pas 
le point décimal cher à nos amis anglo-saxons, mais exige 
une virgule « bien de chez nous ». Qu'à cela ne tienne, la 
virgule se retrouve comme par enchantement à la place du 
point sur le pavé numérique. 
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SAISIE DU FICHIER KEYS.MP. 


Pour utiliser ce fichier: il suffit de le saisir (attention à la 
syntaxe) sous le nom KEYS.MP. Pour cette saisie, deux 
possibilités sont offertes : 


e soit utiliser LOCOSCRIPT, saisir le texte puis transformer 
le fichier en ASCII par l'option disponible sous la touche f7 
(si votre LOCOSCRIPT est ancien et ne dispose pas de cette 
fonction, courrez chez votre revendeur lui demander la 
nouvelle version). La flèche s'obtient par EXTRA+ (accent 
circonflexe). 


e soit utiliser RPED sous BASIC. Mettre en place la face N°2 
de la disquette Amstrad et taper BASIC RPED. Choisir la 
fonction f3 pour la saisie ou fl pour effectuer des corrections. 
Cet éditeur est correctement documenté. La flèche s'obtient 
par . (accent circonflexe seul) 


Evitez de saisir les commentaires, c'est-à-dire les lignes 
débutant par une étoile, au risque de voir apparaître des 
messages d'erreurs à l'initialisation. Il n'est pas indispensable 
de saisir les deux colonnes de droite qui donnent 
respectivement les combinaisons de touches et les fonctions 
obtenues, mais 1l est néanmoins vivement recommandé d'en 
prendre connaissance. 


ORGANISATION 
DE LA DISQUETTE DE TRAVAIL. 


Créez de la même manière un fichier PROFILE. SUB qui a 
pour rôle de transférer automatiquement dès la mise en route 
l'ensemble du logiciel sur le drive M:, pour un 
fonctionnement beaucoup. plus rapide. En voici le contenu 
PIP M:=A:MP%k.% 

SETKEYS KEYS.MP 

M: 

MP 

À l'aide de l'utilisataire PIP (disque N°2 d'Amstrad), créer 
une disquette de travail qui contienne les fichiers suivants : 


J12FCPM3.EMS (-CP/M disque N°2 d'Amstrad) 


KEYS .MP (redéfinition de clavier) 
MP .COD (disquette Multiplan) 
MP COM (disquette Multiplan) 
MP80 ; (disquette Multiplan) 
MP80 .ASC (disquette Multiplan) 
PIP COM (disque N°2 d'Amstrad) 


PROFILE .SUB (voir texte) 
SETKEYS .COM (disque N°2 d'Amstrad) 
SUBMIT .COM (disque N°2 d'Amstrad) 


Par précaution, tous les fichiers dont le nom commence par 
MP doivent correspondre à la même version de MULTIPLAN, 
sous peine d'incompatibilités. Après lancement, il est 
absolument nécessaire de taper sur EXTRA + À ou EXTRA +B 
pour accéder aux feuilles de calcul stockées respectivement 
sur le drive À: (autre face du disque A: par exemple) ou le 
drive B : pour les heureux possesseurs du PCW 8512. Notez 
toutefois que l'utiisation alternée des deux faces d'une 
disquette sur le drive A: peut conduire à des déboires 
(modification de données, voire perte de fichiers) lors d'un 
usage mtensif. Nous en avons fait la douloureuse expérience 
à plusieurs reprises. 


CREATION 
DE FONCTIONS PERSONNALISEES 
DANS LE FICHIER KEYS.MP. 


Si vous souhaitez ajouter à KEYS.MP vos propres fonctions, 
sachez qu'il existe une limite au nombre total de caractères 
possibles dans l'ensemble des chaînes redéfinissant les 
touches. Or, cette limite est presque atteinte, notamment par 
les déplacements du curseur et les initialisations de 
disquettes. Il faudra donc réaliser un compromis entre les 
nouvelles fonctions et celles proposées dans cet article, par 
exemple en ce qui concerne la longueur des déplacements 


multiples de curseur. Il est conseillé de tester toutes les 
fonctions avant utilisation définitive, pour s'assurer que toutes 
les combinaisons de touches désirées sont opérationnelles. 


Multiplanement vôtre 
M TONY LUZY 


% (note : ne pas saisir les lignes débutant par une étoile) 
+ mouvements de curseur dans la feuille de calcul 


I4N ‘“tE” curseur haut = ] ligne plus haut 
14S “t#8D'" SHIFT + curseur haut = 16 lignes plus haut 
6N “D” curseur droit = ] colonne à droite 
6S ‘t#8E'” SHIFT + curseur droit = 8 colonnes à droite 
TION ‘“tX” curseur bas = ] ligne plus bas 
19S “t#8F'" SHIFT + curseur bas = 16 lignes plus bas 


I5N ‘“tS” curseur gauche = | colonne à gauche 
15$ “t#90'"” SHIFT + curseur gauche = 8 colonnes à gauche 
I7A ‘“t#9l” ALT +"(’(signeinf. à) vers l'° col. ligne suivante 
19A ‘“t#92" ALT + “)'’(signe sup. à) vers l'* ligne, col. suivante 
17SA “#93”  SHIFT + ALT + ‘ (”’ vers l'° colonne dernière ligne 
19SA “#94”  SHIFT + ALT + ‘‘}>" vers l'° ligne dernière colonne 
INS “t2” “2” (pavé num) vers fin de la feuille de calcul 
1ASA ‘“tQ" ALT +2" vers début de la feuille 

INS “tW” COPY vers fenêtre suivante 

3NS ‘“tF” PASTE vers cellule suivante non protégée 


% annulations/corrections de commandes (une commande 
est la ligne en bas de l'écran obtenue par Alpha, Calcule 
ou Edite, etc ..). 


66NS “tC'  STOP annule commande en cours 

I5NS “t(C' CAN annule commande en cours 

I6NS “*Y'  DEL- efface caractère 

TNS “tH' <+DEL efface car. ou élémt. précéd. du menu 
5N ‘LL’ CHAR caractère droit (dans une commande) 
5A ‘tK' ALT + CHAR caractère gauche (dans une commande). 
5S “tP'  SHIFT + CHAR mot droit (dans une commande). 


5SA ‘tO"  SHIFT + ALT + CHAR mot gauche (dans une commande). 
21SA “t#95'" SHIFT + ALT +P supprime protection en vue corrections 


% remplace point décimal par virgule (version française de 
MULTIPLAN) 


19E 7 point (pavé num.) = virgule décimale 


+ nitialisation périphériques 
67E ‘“t#9A" EXTRA + À initialise sur drive À: 
54E ‘t#9B'” EXTRA + B initialise sur drive B: 


% La ligne précédente peut être supprimée si vous n'avez 
qu'un lecteur de disque. 


INS “t#9F" RELAY (inopérant) 
20NS “t#9F'" FIND (inopérant) 
I3NS “t#9F " LINE (inopérant) 
IONS “t#9F'" CUT (inopérant) 
O2NS “t#9F'" fl (inopérant) 
ONS ‘t'#9F" 83 (inopérant) 
TDNS ‘*'#9F" f (inopérant) 
TINS “t#9F" f (inopérant) 
E#8A ‘tLtH”" 


E#8D “tETETEEE'EtETE'E'EtEtENEtEtEtE " 
E#8E “tD'D'DtD'DtDtDtD” 

E#8F “tXIXIXIXXEXIXEXIXEXEXEXEXEXEXEX" 
E#90 “SISISISISISISIS" 

E#91 “XVLHI1tM” 

E#92 ‘“DVLItM” 

E#9A ‘“tONTMLOIA:tMLC'X" 
E#9B “ON!MLOMIB:tMLC!X" 


‘La ligne précédente peut être 
supprimée si vous n'avez qu'un 
lecteur de disque. 

E#93 “tZVLtIltM” 


E#94 “tZVLItM” 
E#95 “PCIQ:tZIN'M” 
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GENERATEUR DE COMMANDE 
D’IMPRESSION POUR DBASE II 


DBASE le grand sait presque tout faire, mais quel travail pour organiser ses commandes ! Nous 
avions déjà entrevu l'organisation de l'impression avec ce géant et, jouant des codes magiques, 
nous faisions de superbes étiquettes (cf Echo 4, p.12). Nantis d’un esprit rationnel et d’une 
logique à l'épreuve des balles, nous ne pouvions en rester là. Alors, arborant l’étendard 
flamboyant de l'efficacité, nous avons asservi la technique à notre volonté et, recourant à l'arrière 
garde, l'imprimante, champ de nos combats les plus féroces, a dû céder, non sans résistance, 
à l’héroïsme de ce héros des temps modernes : PRINTER MAKER 3. 


L'imprimante, vous connaissez. Nous avons appris à 
découvrir les subtiles nuances de sa psychologie dans 
l'Echo N°2 en tentant un premier dressage à l'aide de 
PRINTER MAKER 1. Toujours sournoise, elle profitait de 
notre patience pour nous contrer sous CP/M. Jamais 
vaincu, nous parâmes à ce contre d’une botte cinglante 
en musclant nos armées de l'option de rigueur (cf. Echo 
4 p 27). 


Pensez-vous que la belle s'était rendue ? Que nenni, elle 
continua à se jouer de nos modestes, mais néanmoins 
vaillants assauts en laissant à nos troupes le soin de se 
défaire, en programmant DBASE, de ses pièges perfides. 


ll fallait frapper fort et le coup est parti, PRINTER MAKER 
3 tel un conquistadore, se devait sans céder, de faire plier 
la gueuse en offrant à son roi PCW, une victoire d'éclat 
qui se livra à ses pieds : 


PRINTER MAKER 3 - REFONTE TOTALE 


Comme la page suivante vous donne tout loisir de le 
constater, notre guerrier a bénéficié de quelques 
modifications notoires. 


Lors du numéro 5, je vous avais proposé d'ajouter une 
option permettant la création de fichiers ASCII destinés 
à être utilisés avec SETLST.COM de CP/M. Malheureu- 
sement, ce programme était conçu à partir de la version 
disquette qui comportait une différence de 10 au niveau 
de la numérotation. Si de nombreux lecteurs ont rétabli 
sans problèmes l'écart, d’autres m'ont fait les honneurs 
de leurs réprimandes qui me coutêrent 3 nuits de 
sommeil. Pour éviter ce genre de confusion et, compte 
tenu de l'importance des modifications, j'ai jugé plus sage 
de vous proposer une version complète et sévèrement 
remaniée. 


La première modification est de taille puisqu'elle permet 
la création de fichier de commandes au format DBASE. 


Utilisables en mode direct ou en mode programme, les 
commandes DBASE s’obtiennent à partir du logiciel par 
DO SON NOM [RETURNI. 


Notez que PRINTER MAKER 3 vous propose d'ajouter un 
commentaire sur 60 caractères qui viendront se placer 
en début de commande en le faisant précéder de l'étoile 
annonciatrice d’une remarque ne devant en aucun cas 
être interprétée par DBASE. 


Chaque commande générée par PRINTER MAKER 3 peut 
aussi être modifiée sous DBASE à l’aide de l'ordre 
MODIFY COMMAND. 


La deuxième modification est relative au choix du lecteur 
de disquette par défaut. Opérationnelle par une pression 
de la touche « D » (menu secondaire), cette option vous 
permet de sélectionner le lecteur sur lequel vos fichiers 
seront enregistrés si vous ne le précisez pas en donnant 
son nom. 
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Exemple : Si le lecteur par défaut est M, l'entrée du nom 
TOTO.ASC enverra le fichier correspondant sur le disque 
virtuel M: Par contre, si vous tapez A:TOTO.ASC, il se 
mettra sur la disquette située dans le lecteur A et ce, 
quelque soit le lecteur par défaut. 


Je vous précise que le lecteur par défaut peut être modifié 
plusieurs fois sans gène particulière. 


PRINTER MAKER 3 - LA SAISIE 


Conformément aux 2 pages de listing qui suivent cet 
article, PRINTER MAKER 3 est à saisir sous BASIC 
MALLARD. Dans le cas où cette opération vous semble 
hors de portée, je ne peux que vous conseiller la lecture 
de l’article « UN DEPART SAISISSANT » (cf. Echo N°1) 
qui vous permettra de le faire sans aucune difficulté. 


Je rappelle aux initiés de la secte MALLARD que 
AUTO 0,10 [RETURN] leur évitera toute erreur quant à 
la numérotation des lignes. 


PRINTER MAKER 3 - L'UTILISATION 


Notre héros est maintenant un programme complet et 
riche en possibilités. Le détail de son mode opératoire et 
de ses possibilités ont été largement décrits dans l'Echo 
N°2 et augmenté dans l’Echo N°5 mais peuvent toutefois 
faire l'objet d’un rappel : 


Une fois lancé, PRINTER MAKER 3 permet de sélectionner 

les paramètres d'impression à l'aide des flêches de 

curseur haute et basse. Les valeurs des paramètres sont 

modifiées par les flèches de curseur gauche et droite. Une 

fois les choix effectués, la touche [RETURN] envoie sur 

un menu secondaire qui donne les options suivantes : 

- Envoie d'une séquence de test à l'imprimante pour 
vérifier la qualité du paramètrage. 

- Retour à l'écran de départ pour 
paramètrage. 

- Génération d’un petit programme BASIC pouvant refaire 
le paramétrage sans PRINTER MAKER 3. 

- Fin d'utilisation retour au BASIC. 

- Listage à l'imprimante de tous les codes ASCII du 
paramètrage. 

- Création d’un fichier paramètres ASCII pour utilisation 
avec SETLST.COM (voir Echo N°5). 

- Création d’une commande DBASE (voir plus haut). 

- Lecteur de disquette par défaut (voir plus haut). 


un nouveau 


PRINTER MAKER 3 - CONCLUSION 


Si le paramétrage se rapporte à votre imprimage, alors 
vous allez faire des ravages ! 


M MARC HERMION 
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CARACTERES PAR POUCE 17.0 


MINI: 4 NAXI:139 


LE LECTEUR PAR DÉFAUT EST : À 
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VOULEZ-VOUS... 
CE)SSAYER VOTRE DEFINITION 
<—| (MODIFIER VOTRE DEFINITION 
(COENERER UN PROGRAMME DE DRFINITION 
CDINTERRONPRE NOTRE ENTRETIEN 













LE LE 1 LEL EL) +. LLLLELLL I LL EL] or 





SE Le mm 






amac + Passe PO AR >| GL)ISTER LA SEOUENCE DE CON 
ue (O)UURIR UN FICHIER ASCII 
. x PRINTER MAXI « (CREER UNE COMMANDE DBASE 
+ © LOGI'STICE 87 (DRIVE PAR DEFAUT (ACTUEL:N) 


ESSAYER VOTRE DEFINITION | 
LRSAA TON, -,/0123456789: : (=) AABCOEFGHIJKLMNOPQRSTUVUXYZ 68" SELECTIONNES LE LRCTEOR PAR DEFOUT (4)/ CB 00) 
_'abcdefghijklanopgrstuvexyzédê" !"##28"()4+,-,/0123456789: <=) 
?aABCDEFGHIJKLANOPQRSTUVUXYZ° 65" _‘abcdefghi jklanopqrstuvexyzébè 





LISTER LA SEQUENCE DE CODE | | GENERER UN PROGRAMME DE DEFINITION 
-2- 60-27-80 -15- 27-67-70 - 27 - 66 - 27 - 99 - 2 
T-82-1-27-88- 27-109 - 49- 27 - 108 - 30 - 27 - BI 
-3-27-78-0 


0 DATA "00000,2,,P,,15,,C,F,,8,,R,,,4,,n1,,1,,,0,5,,N,,00080000 

000000000000 PDO 200020022000 00000000 A DE 13/03/87 - 64 COL 

,  CONDENSE - ZEROS BARRES - BDP=0 
00000000000000002000000000000" 





20 REM 

30 REM RENRERENTENNERENEENANENNETTRAEIRENS 

40 REM 3 PRINTER MAKER V 2,2 } 

S0 REM #  MADE BY LOGI'STICK (C) 87 Î 

60 REN POUR L'ECHO DU PCV } 

70 REM BRRRERAIRETIRINANENIAEENTENAETINRENS 

80 REM 

1170 VIDTH LPRINT PEEK(31393):0N ERROR 6070 1250 

1180 FOR 1=31395 T0 31485:A=PEEK(I):B=PEEK(1+1):C=PEEK(1+2) :D=P 
CREER UNE EEK(1+3):E=PEEKCI+4):1F C=48 AND 0=48 THEN 11299 ELSE GOSUB 120 
COMMANDE 0 

<— DBASE 1190 I=I+IT:NEXT:LPRINT:LPRINTLPRINT:G0TO 790 

1200 IF C=49 AND D=53 THEN LPRINT CHR$(15)::TI=4 RETURN 

1210 LPRINT CHR$(27);:1F A=2 AND E=44 THEN LPRINT CHRS(C)CHRS(D 


OUVRIR UN FICHIER ASCII | 


WIOTH LPRINT 255 
S'Esc'" 59'*'ESC'"" 80" "IS" "ESC" 67'*' 66'*'ESC'*" S6'°'ES 


C'*" gg'*'ESC'"" 82'*" l'*'ESC'"" 88'*'ESC'*" 109'*" 49'*'ESC"" 
" 108"*" 30" 'ESC'"" 81'°" 93'*'ESC'*" 78'°' 9" 









): 1124 :RETURN 

1226 IF AC3 THEN LPRINT CHRS(C): :11=3:RETURN 
1230 IF C:78 OR C:82 THEN E=E-1 

1248 LPRINT CHRS(C)CHRSCE): : 1125: RETURN 

1250 END 
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G DATA “00000000000000000200000000000020000000000080000002000 
0000000000000000000000000000000000000000000000000000000000000 
000000000000000000000000000000700000000000080000000000 0002020 
00000220000000000000000000000000000000000000000 000000000000 00 
0000000000" 


20 REN 

30 REM RATES EEE 
40 REN à PRINTER MAKER V 2,2 X 
50 REM%  MADE BY LOGI'STICK (C) 87 3 
60 REM à POUR L'ECHO DU PCY } 
70 REM BRASSENS EEE EEE EEXLTSETTX 
80 REM 


90 CLEAR,DIM SEQ$(20) CHAINES (50) ,CODE$(30), VALEUR( 30) , OPTION 
5(30):DEF FNAS(X)="CHR("#RIGHTS(STRSCA),LENCSTRS(X))-1)+")":D 
R$="A":NIOTH 255 

100 ESC$=CHRS(27)  ROS=ESC#+" D" RF$=ESCS+" q" : VASZESCS+"V" : PRIN 
T ESCS"E"ESCS"Q"ESCS"H"ESCS"f"; :RESTORE 210:FOR 1=0 TO 3:READ 
CPPCI),MINIGCT),MAXIG(I) ,MINIDCI) ,MAXIDCI):NEXT 

110 CCSQ:RESTORE 250:FOR 121 TO 4:READ A$,B:PRINT RO$"#"A$"#" 

RF$:FOR J=1 TO B:CC=CC+1:READ B$,C$,C,D:OPTIONS(CC)2D : VALEUR( 

CC)=C 

124 CODES(CC)=CS: PRINT SPACES(15):B$; :IF C$<>"#" AND CC£)10 T 
HEN PRINT YASCHRS(CC+32)"C";"ESC + "CHRS(34)CSCHRS(34) ELSE I 
F CC=10 THEN PRINT SPACES(1S)CHRS(34)"15"CHRS(34) 

130 GOSUB S90:NEXT J'CC=CC+1:NEXT I'NN=O PRINT YX$"22LE LECTE 

UR PAR DEFAUT EST : "OR$,YX$"62PRESSEZ "RDS" <RETURN> "RF$" P 

OUR VALIDER" YA$";a% PRINTER MAKER #"YA$"=D"CHR$(164)" LOGI'ST 
ICK 87"; GOSUB 600,Y=33 

149 PRINT YXSCHRS(Y-1)"- "YXSCHRSCV+1)"- "YXSCHRS(Y)"-)" 

150 PRINT YASCHRSCY-1)"U "YXSCHRSCY+T)"N "YXSCHRSCY) "UK" 

160 AS=INKEVS:IF A$="" THEN 160 ELSE A=ASC(AS):IF Az] OR A=6 

THEN GOSUB 280 :V=YY 

170 IF A=31 AND V)33 THEN Y=Y-1:607T0 140 

189 .IF A=13 THEN PRINT ESC$"E"ESC$"H":G0TO 680 

190 IF A=30 AND Y<62 THEN V=Y+1:G60T0 140 

200 60TO 160 

219 DATA 10,0,78,2,81,12,0,93,3,96,12,0,93,3,96,17,0,133,4,13 


9 

220 PRINT SPACES(A4)::1F C=Q THEN PRINT " NON ":RETURN ELSE PR 

INT ROS" OUI "RFS RETURN 

230 IF Y=51 THEN PRINT SPACES(4):ELSE PRINT "+ ": 

240 PRINT "C";USING "HHN":C: PRINT ")":RETURN 

250 DATA INTERLIGNE,5,1/6,2,1,1,1/8,0,0,1,7/12,1,8,1,N/216,3, 

0,255,N/72,4,0,85, CARACTERES, 19,PICA,P,1, 1,ELITE,M,0,1,PROPOR 

TIONNEL ,p1,0,1,CONDENSE, 15,0, 1, INDICE, 58,0, 1 EXPOSANT,S1,0,1, 

ELARGI,N1,0,1,GRAS,E, 0,1 DOUBLE FRAPPE, 6,0,1, ITALIQUE,4,0,1 

260 DATA PAGE, 4,LIGNES PAR PAGE, C,70,127,FIN DE PAPIER,8,0,1, 

FEUILLE A FEUILLE, $,1,1, CONTINU, c,@, 1 SPECIAL, 8 POLICE R 1,8. 

ZERO BARRE, X,0,1, COURRIER, n1,0, 1, SOULIGNE, -1,0, 1 WIDTH LPRINT 

0 ,8,127,265,MARGE GAUCHE, 1,0,79,MARGE DROITE, Q,78,81,BAS DE PA 
GE, N, 3,255 

270"IF D(=1 THEN 220 ELSE 220 

280 YY=V:0=1:PE=INTCA/6):CC=V-32:1F OPTIONS(CC)=1 AND PECVAL 

EURCCC) THEN RETURN 

29 ON Y-32 GOTO 310,310, 310,300, 300,360, 330,330, 330,430, 370, 

370,450 ,450,410,420,360,500,420,400,400,360,510,420,419,420,5 

10,550 570,480 

300 IF C(PE=1)=(VALEUR(CC)=0))#C(PE=0)=(VALEUR(CC)=0PTIONS(CC 

)))=-2 THEN RETURN 

310 PART=VALEUR(CC):IF DIC)CC THEN D1=CC:FOR 1=1 TO 5:VALEUR( 


L)=0:NEXT:VALEUR(CC)=PART+S4SGN(PE#-3+1):FOR CC=1 TO S:C=VALE 
URCCC) :D=0PTIONS (CC): 60SUB 598 :NEÂT: RETURN 

324 VALEUR(CC)=PART+SRSGN(PER-3+1 ) :C=VALEUR(CC) :D=OPTIONS(CC) 
:G0SUB 590 RETURN 

330 PART=VALEUR(CC):PC=CC-7:XT=PC:FOR 127 T0 9:VALEUR(1)=@:NE 
AT: VALEUR(CC)=T:FDR CC=7 TD 9:C=VALEUR(CC) :D=OPTIONS(CC) : GOSU 
B 590:NEXT 

340 IF VALEUR(1@)=1 THEN PC=3:G0T0 600 ELSE 600 

350 IF XT=2 THEN VALEUR(13)=0:CC=13:C:0;0=1:G0SUB 590: VALEUR( 
14)=0:CC=14:60SUB 590: VALEUR(25)=0:CC=25:G0SUB 590 :CC=11 :VALE 
UR(11)<0:60SUB 590:CC=12; VALEUR(12)=0:G0SUB 599:PC=2:G0T0 600 
360 RETURN 

370 IF PE=VALEUR(CC)=0 THEN RETURN ELSE VALEUR(11)20:VALEUR(1 
2)=0 ; VALEUR(CC)=ABS(O=PE) ;CC=11 C2VALEUR(11):GOSUB 590:CC=12: 
CEVALEUR(12):60SUB 590 

380 IF PE=Q THEN C=0,CC=15 :VALEUR(CC)=0:60SUB 590 :CC=25 ; VALEU 
R(CC)=0:G0SUB 590 

390 RETURN 

400 SWAP VALEUR(20), VALEUR(21 ) :CC=20: C=VALEUR(20) :GOSUB 590:C 
C=21:C=VALEUR(21):G0T0 590 

410 IF VALEUR(11)+#VALEUR(12)20 THEN RETURN 

420 C=ABS(IX(PE-1));VALEUR(CC)=C:G0TO 590 

430 C=ABS(TS(PE-1));VALEUR(CC)=C:GOSUB 590:1F C=0 THEN PC=AT: 

60TO 340 

440 PC=3:G60T0 600 

450 GOSUB 420 :60T0 600 

460 RETURN 

470 IF C(PE=1)=(VALEUR(CC)=0) )+((PE=0)=(VALEUR(CC)2DPTIONS(CC 
)))=-2 THEN RETURN 

480 IF VALEUR(CC)>-1+PE AND VALEUR(CC)VALEUR(IB)+PE-1 THEN C 
SVALEUR(CC)+SGN(PER-3+1): VALEUR(CC)=C:D=DPTIONS(CC)G0TO 590 
490 RETURN 

500 IF (VALEUR(18)=pe)=-1 THEN RETURN. 

510 IF C(PE=1)=(VALEUR(CC)=0) )+((PE=0)=(VALEUR(CC)=OPTIONS(CC 
)))=-2 THEN RETURN 

520 IF CC=27 AND VALEUR(CC)<34PE THEN RETURN 

530 IF CC=18 AND VALEUR(30)=VALEUR(18)-PE THEN RETURN 

540 C=VALEUR(CC)+SGN(PEX-3+1 ): VALEUR(CC)=C:D=DPTIONS (CC) :60TO 
590 

550 C=VALEUR(CC)+#SGN(PEX-3+1): IF C€MINIG OR COVALEUR(29)-6 TH 
EN RETURN 

560 VALEUR(CC)=C:D=0PTIONS(CC) :G0TO 59 

570 C=VALEUR(CC)+SGN(PEX-3+1):1F C)MAXID OR C{VALEUR(28)+6 TH 
EN RETURN 

580 VALEUR(CC)=C:D=0PTIONS(CC) :G0TO 590 

599 Y=CC+32:PRINT YKS:CHRS(Y); "M": :GOTO 270 

600 PRINT YXS"#SCARACTERES PAR POUCE" USING “##E,#":CPP(PCIK( 
1-VALEUR(13)/2) :MINIG=MINIG(PC) :MAXIG=INT(MAXIG(PC)#(1-VALEUR 
(13)/2)):MINID=MINID(PC) :MAXID=INT(MAXID(PC)#(1-VALEUR(13)/2) 


) 
610 PRINT YAS"'SMARGE GAUCHE" :YXS")SMINT :"MINIG"MAXI:" USING 
TO TTC 

620 PRINT YAS"#SMARGE DROITE" : VKS"-SMINT :"MINID'MAXI:" USING 
DTTOENT TE 

630 IF VALEUR(28)€MINIG THEN VALEUR(28)=2HINIG 

640 IF VALEUR(28))MAXIG THEN VALEUR(28)=MAXIG 

650 IF VALEUR(29)MINIO THEN VALEUR(29)=HINID 

660 1F VALEUR(29)MAXID THEN VALEUR(29)=HAXID 

670 CC=28:C=VALEUR(28) :D=99:G0SUB 590 :CC=29: C=VALEUR(29) :G0SU 
B 590 :RETURN 

680 CO=1:RESTORE 750:FOR 1=0 TO 30:READ A:IF 1=23 OR 1=30 THE 
N VALEURCL)=VALEUR(1)+1 

690 B=VALEURCI):IF BC0 THEN 710 


700 NEXT:GOTO 769 | 

710 IF 1327 THEN CHAINES(CD)=CHR#CA):CO=C0+1 :ELSE CHAINES (0) 

=CHRS(VALEUR(27)) :60TD 700 

720 CHAINESCCO)=CODES (1) ;C0=C0+1 

130 IF A=2 THEN 700 

740 CHAINESCCO)=CHRSCVALEURCL)):C0=C0+1 :G0TO 700 

750 DATA 2,2,2,2,3,3,0,2,2,2,2,2,2,2,2,2,2,0,3,2,2,2,0,3,2,2, 

2,0,3,3,3 

160 POKE 31393, ASCCCHAINES(0)):PT=Q:FOR 1=2 TO 109 STEP 2:PT= 

PT+L:AS=CHAINESCPT) IF LENCAS))1 THEN QQ=3 ELSE IF A$="" THEN 
1170 

770 POKE 3139941 ASCCA$):IF QQ=3 THEN POKE 31394+1,ASCCRIGHTS 
(A$,1)):QQ=0:1<1+1 

780 POKE 3139441, 44:POKE 3139541 ,48:NEXT 

790 PRINT ESCS"E"VAS"SAVOULEZ-VOUS, , ,":PRINT YXS"AACE)SSAVER 

VOTRE DEFINITION" YXS"CACHQDIFIER VOTRE DEFINITION" :PRINT VX 

SYACGIENERER UN PROGRAMME DE DEFINITION" YK$",ACL)NTERROMPRE N 

OTRE ENTRETIEN" :PRINT YXS",ACL)ISTER LA SEQUENCE DE CODE" 

800 PRINT ESCS"VOACODUVRIR UN FICHIER ASCII"ESCS"V2ACCIREER U 

NE COMMANDE DBASE"ESCS"Y4ACD)RIVE PAR DEFAUT (ACTUEL :"DRS")"; 

A$=" EMGILOCO" OPTION FILES DR$ 

810 2S=INKEVS:A=INSTRCAS, UPPERS(2#)):IF A42 THEN 810 

820 PRINT ESCS"E":ON A-1 GOTO 830,840, 1150,870,880,960, 1030, 1 

120:60T0 880 

830 LPRINT:PRINT YXS"2-J'ENVOIE LA SEQUENCE DE TEST, .":FOR I 

21 T0 1OQO:NENT:FOR J=1 TO 2:FOR 1=32 T0 127:LPRINT CHR$(L):: 

NEXT 1, J'LPRINT:LPRINT:LPRINT :G0TO 790 

840 PRINT YXS"2-PRESSEZ (PAT), RESET, EXIT> ET UNE TOUCHE QU 

ELCONQUE " 

850 Z$=INKEVS: IF 24="" THEN 650 

860 FOR 1=31393 TO 21813:POKE I ,48:NEXT :PC=0: VALEURC13)=0:60T 

ù 100 

870 PRINT ESC$"e"ESC#" IA BIENTOT, , ,": END 

880 LPRINT "WIDTH LPRINT";PEEK (31393) 

890 FOR 1=31995 TO 31485 :A=PEEKCI):B=PEEK(I+1):C=PEEK(1+2) :D= 

PEEK(143):E=PEEK(1+4):1F C=48 AND O=48 THEN 11:99 ELSE GOSUE 

914 

90 I=1#I1:NEXT:LPRINT :LPRINT:LPRINT:60T0 790 

919 IF C=49 AND D=53 THEN LPRINT "-"15::11=4:RETURN 

920 LPRINT -"27:21F A=2 AND E=44 THEN LPRINT "-"C"-"D::II=4; 

RETURN 

990 IF AC)3 THEN LPRINT "-"C::1123:RETURN 

949 IF C=78 OR C=82 THEN E=E-1 

959 LPRINT "-"C'-"E;: [125 RETURN 

969 SEQS="":FOR 1231395 TO 31485: A=PEEKCI):E=PEEK(1+1 ):C=PEEK 

(1+2):DsPEEK (143): E=PEEK(1+4):1F C=48 AND D=48 THEN 11=99 ELS 

E GDSUB 980 

970 I=I#IL:NENT:PRINT ESCS"E"ESCS"H": INPUT "NOM DU FICHIER":N 

ONSEQS :OPEN "0", 1 NOMSEQS PRINT #1,SEQ$:CLOSE :G0TO 790 

98 IF C=49 AND D=53 THEN SEQS=5E0$+"* "15": II=4 RETURN 

994 SEQS=SEQS+"" "ESC "IF A=2 AND E=44 THEN SEQS=SEQS+"" ""45T 

RSCCI4M * MASTRS(D)4" I I<4: RETURN 

1009 1F AL)3 THEN SEQS=SEQ$+"" ""#STRS(C)+"": 1123: RETURN 

1018 1F C=78 OR C=82 THEN E=E-1 

1028 SEQS=SEQS+"" "STARS CC)" M4STRS(E)+" 1": II=S RETURN 
1030 P=0:SEQ$="":FOR 1231395 TO 31485:A=PEEKCI):B=PEEK(I+1):C 

2PEEK(142):D=PEEK(143) :E=PEEK(1#4):1F C=48 AND D=48 THEN 11=9 

9 ELSE GOSUB 1070 

1040 1=1+11:P=P+:NEXT:PRINT ESCS"H Entrez l'identification d 

u fichier (Max 60 signes)" :: INPUT 1D$:1D$="X"4CHRS(13)4CHRS 1 

Q)4"X "ALEFTS(IDS 60)4CHRSC1O)4CHRS(13)+ 2" 4CHRS( 13) 

1050 SS$="SET PRINT ON"+CHRS(10)#CHRS(13)+"SET CONSOLE OFF":S 

AS="SET CONSOLE ON"4CHRS(13)#CHR8(10)4"SET PRINT OFF"4CHRSC1 


3)+CHR$C10)+"RETURN" 

1060 INPUT " Non du fichier":NOMSEQS:NOM$=LEFTS(NOMSEQS,8)+", 

CMD":OPEN "D",1,NOMS:PRINT #1,ID$:PRINT #1,55$:F0OR 1=0 TO P-2 
!PRINT #1,SEQ$CL):NEXT PRINT #1,SA$: CLOSE :GOTD 790 

1070 IF C=49 AND D=53 THEN SEQ$(P)=SEQ#(P)+"? CHRCIS)":FI=4"R 

ETURN 

1080 SEQS(P)=SEQS(P}+"? CHR(27)": IF A=2 AND E=44 THEN SEQ#(P) 

SSEQSCP)+"+"+FNAS(C)+"+"+FNAS (D): IT=4 RETURN 

1999 IF AC>3 THEN SEQ$(P)=SEQ#(P)+"+"+FNA$(C): II=3:RETURN 
1100 IF C=78 OR C=82 THEN E=E-1 

1110 SEQS(P)=SEQ$CP)+"+"+FNAS(C)+"+"+FNASCE) : TT=S RETURN 

1126 PRINT YXS$"X7SELECTIONNEZ LE LECTEUR PAR DEFAUT (A)/(B)/{ 

m" 

1130 DR$="A":AS=INKEVS:IF A$C)"A" THEN DR$="B" IF A$C)"B" THE 

N DR$="M":IF A$C)"M" THEN 1130 

1148 GOTO 790 

1150 PRINT ESC$"e"YX$"&!": INPUT "VOTRE IDENTIFICATION (MAX 1 

00 SIGNES)" AS :A$=SPACES(S)+AS+SPACES(IOI-LENCAS)):FOR 1=3150 

0 T0 31605:POKE L,ASC(MID$(A$,1-31499, 1 )):NEXT 

1160 PRINT "N'OUBLIEZ PAS DE LE SAUVEGARDER !11":DELETE 90-11 

60 

1170 WIDTH LPRINT PEEK(31393) ON ERROR GOTO 1250 

11806 FOR 1=31395 TO 31485 :A=PEEK(1):B=PEEK(I+1):C=PEEK(I+2) D 

SPEEK(1+3):E=PEEK(I+4):IF C=48 AND D=48 THEN 11:99 ELSE GOSUB 
1200 

1190 I=I+IT/NEXT:LPRINI :LPRINT:LPRINT:GOTO 790 

1200 IF C=49 AND D=53 THEN LPRINT CHR$(15); : LI=4 RETURN 

1210 LPRINT CHR$(27)::IF A=2 AND E=44 THEN LPRINT CHR$(CICHRS 

(D); :11=4 RETURN 

1220 IF A()3 THEN LPRINT CHR$(C); :II=3:RETURN 

1230 IF C=78 OR C=82 THEN E=E-1 

1240 LPRINT CHR$S(C)CHRS(E): :LI=5 RETURN 

1250 END 





MASTERFILE 3000 


Le gestionnaire de fichiers le plus attendu sur PCY ! 





ATTENTION, MASTERFILE 8000 n'est pas un programme BASIC compilé rapidement adapté du 
CPC au PCW ! C'est un produit entièrement nouveau, qui bien qu'il ait gardé le meil- 
leur des caractéristiques de la version CPC, a été créé spécialement pour le PCW. 

Les autres produits disponibles offrent un choix entre des fichiers en RAM rapides 
mais de capacité limitée, et des fichiers en accès direct sur disquettes, de grande 
capacité mais encombrants car de longueur fixe. MASTERFILE 8000 et le disque RAM du 
PCW travaillent ensemble pour vous proposer: grande capacité et accès rapide à des 
données de longueur variable. La longueur de vos fichiers n'est limitée que par la 
taille de votre disque M. L' abscence d' accès disquettes en cours de travail repré- 
sente un gain de temps et une économie d'usure appréciables. 


MASTERFILE traditionnellement champion de sa catégorie en ce qui concerne la créa- 
tion de masques de saisie et de présentation des données s'est surpassé. Tous les 
questionnaires et menus ont disparu, vous créez "en temps réel" à l'écran vos mas- 
ques, comme dans un programme de dessin. La mise à jour d'enregistrements est 
directe grâce à l'éditeur "pleine page" du programme qui permet les modifications et 
corrections de rubriques directement sur le masque. 


Des options uniques permettent de gérer les dates en clair ( 17 janvier 1987 au lieu 
de 870117 par ex. ), de placer M. Mme, Melle, etc. devant les noms tout en gardant 
la possibilité de trier ceux-ci. 

Tout l'affichage écran est GRAPHIQUE et les effets - lignes, boîtes - sont dessinés 
avec précision, les interlignes se choisissent en pixels - vous serez étonné de la 
clarté des lignes de 9 pixels. Tout ceci plus rapidement que CP/M ne le permet nor- 


malement. Les options de l'imprimante PCW sont toutes accessibles par menu. 


Les fichiers indexés sont automatiquement classés en séquence et ne devront jamais 
être triés. Vous pourrez aussi créer des fichiers non indexés, dans lesquels vous 
pourrez insérer des données où vous le voudrez. Il est possible de créer de fichiers 
"relationnels" ayant jusqu'à 8 niveaux. Vous pourrez importer/fusionner tout fichier 
ASCII (par ex. de MASTERFILE III) ou exporter des données par exemple vers un 
traitement de textes comme TASWORD 8000. La fusion de fichiers est aussi possible; 
pour les fichiers indexés, il s'agit d'un véritable "merge" et non pas d'un ajout. 
Cette fonction permet la copie de fichiers en modifiant l'ordre des clés. De 
nouvelles rubriques peuvent être créées en tout temps. 


La recherche des fichiers combine flexibilité et rapidité et comprend toutes les 


options de tri habituelles: alphabétique, numérique , croissant/décroissant, 
logiques, par dates etc... Il vous est même possible d' assigner dans des cases (| 7 
au maximum ), pendant le tri, des sous-ensembles de données pour référence ou 


traitement ultérieur. Le plus souvent MASTERFILE 8000 vous attendra, pas le 
contraire. 


MASTERFILE 8000-:est entièrement dirigé par menus, 100% en code machine, il est livré 
avec une bibliothèque d'exemples directement utilisables et un manuel didactique 
détaillé. Aucun autre SGBD (Système de Gestion de Bases de Données - un grand mot 
pour décrire un “carton à chaussures plein de fiches"...) sur PCW n'offre une telle 
puissance, flexibilité et convivialité. 


MASTERFILE 8000 est offert aux lecteurs de  l'ECHO du PCW au prix spécial de 
lancement de 450 FF HT (offre valable jusqu'au 30 mars 1987). 


Bon de commande ----------- à renvoyer chez Sémaphore, C.P. 32 - CH 1283 La Plaine (Suisse). 
LU SE RS OR ER PERDOR LE ue cer ac à MC D Commandez par téléphone 
RATES CC nent An CD MERDE M ES 0 MTS Nr MN ES es au 19 41 225411 95 
Code postal . . . . .. VAT One Entente tn De mare KA Lundi à vendredi 


Envoyez-moi au plus vite: loffre valable jusqu'au 30.03.87] 
. . . Disquette/s MASTERFILE 8000 à . 450FF HT | 

. . . Disquette/s TASWORD 8000 à . 380FF HT | 

. . Disquette/s DISCMATE 8000 à . 199FF HT ... 

. Disquette/s TASPRINT 8000 à . 195FF HT | 

POLE ED TRCORRANAE:. 2524: 0 ul ed Ronde 0 FF) 





TOTAL 
Envoyez-moi ma commande en contre-remboursement { ajouter 25FF pour les frais ]. Je vous règle cette commande par 
Mandat postal International à Virement bancaire. Je vous autorise à débiter ma carte BLEUE VISA / EUROCARD dont 
len. est ... À phis et NAlIQite rte 


SEgDaCUE BL em sac huis A Dates nee L'Echo du PCV n. 


qui peut être reproduite à l'infini en modifiant à chaque fois 
le nom de chaque client à chaque facture. 


LE CLUB 
S'EXPORTE ! 


Depuis que le PCW est devenu une star, le Club s’est enrichi 
de la présence de nouveaux membres dont les horizons 
professionnels sont très différents : des artisans, des chefs 
d'entreprises, des étudiants, des professions libérales, des 
fonctionnaires, des retraités, etc... Le niveau de 
connaissances en informatique et sur le PCW en particulier 
varie beaucoup en fonction des membres du club ce qui 
permet un échange d'informations très pratiques pour tous. 
Cet échange d'informations s'effectue par l'intermédiaire du 


bulletin de liaison qui s'enrichit et s'étoffe au fur et à mesure 
par l’action de ses différents membres. 


Pour effectuer ces opérations, la procédure à suivre (puisque 
certains lecteurs me l'ont demandée avant de s'inscrire au 
club) est très simple : Votre lettre ou tableau (ou autres) est 
conçu sous Locoscript en respectant certaines conditions 
telles que les doubles crochets, les espaces intercalés entre 
l'en-tête, le corps de l'opération et les formules de 
présentation des résultats (tout ceci est présenté avec le 
programme). Ensuite vous sauvegardez votre lettre en format 
ASCII. Sous CP/M, vous insérez la disquette contenant le 
programme SCRIVENER qui réalisera les instructions que 
vous lui avez ordonné. Le document créé par SCRIVENER 
contiendra les résultats des opérations et sera modifiable soit 
sous CP/M soit sous LOCOSCRIPT. Je rappelle que le logiciel 
SCRIVENER n'est offert qu'aux membres du Club et non pas 
aux abonnés ou aux lecteurs de la revue (non non non, même 
les pots de: vins n'y changeront rien !). 


Programmes et applications fournis par les membres : Cette 
nouvelle rubrique permet à tous les membres de connaître les 
petites astuces où programmes utilisés par les autres mem- 
bres du Club. Si vous aviez reçu le bulletin n°2, vous auriez 
pu saisir un programme qui permet de réaliser des présenta- 
tions originales sous Basic : fenêtres en vidéo-inverse ou 
mode normal avec inscription de texte en horizontal ou 
vertical, etc...). À noter que le bulletin n°3 présentera 

encore plus de programmes et 


CARTE DU CLUB : 


Lors du premier envoi du Club, les membres du Club 
reçoivent la carte qui leur permet de bénéficier de remises 
chez les revendeurs « POINT CLUB » (de 5 à 15% pour des 
produits informatiques ou non-informatiques, le maximum 
obtenu est une vente à prix coûtant pour des équipements 
hardware). Cette carte leur 


permettra aussi d'obtenir la 
participation à des conditions 
préférentielles aux manifesta- 
tions organisées par le Club. 


CENTRE SERVEUR : 


De même lors du premier envoi 
du Club, les membres prennent 
connaissance du code d'accès 


confidentiel de leur boîte aux Ne EOGART PRENOM 


lettres personnelle, ainsi que de 
leur nom de boîte et de leur 
numéro de boîte. Certains 
membres utilisent régulièrement 
leur boîte en y laissant 
questions, astuces et avis mais 
plus particulièrement pour connaître les dernières remises 
et les réponses à leurs questions techniques. 


HUMPHREY 
1/02/1989 CNE 674894 


SIGNATURE 





d'applications fonctionnant 
sous BASIC, EXBASIC, 
LOCOSCRIPT, DBASE Il, etc. 
et des améliorations de pro- 
grammes parus dans l'Echo. 


PRODUIT CLUB : 


Le Club vous offre sur certains 
produits informatiques des 
remises importantes de l’ordre 
de 10 à 50% du prix public 
(jusqu'à 300 francs sur des 
programmes qui fonctionnent 
sur le PCW !!) (votre carte peut 
être amortie en moins de 3 
achats auprès du Club). La liste 


complète et mise à jour est jointe avec chaque bulletin. 


LE CLUB S'EXPORTE ! 


Certains lecteurs reprochaient au Club d'être trop éloigné de 
leur domicile : Pour cela je rappelle que les antennes locales 
sont en cours de création (dépôt du statut d'association) et 
vont pouvoir (dès que la parution au Journal Officiel aura été 
effectuée) accueillir ces personnes, Le Club se tient à la 
disposition de toute personne qui souhaiterait créer une 
antenne, Ces dernières : 


- Percevront les cotisations des membres inscrits auprès 


LES B.A.L. ECHO : 


Certaines boîtes aux lettres sont réservés à l'Echo et vos 
messages y sont les bienvenus. Ouvertes à tous en voici les 
principales et aussi le moyen de les joindre : 

N° deboîte 1 2 3 4 5 ll 8 
Destinataire ECHO P. HUBER M. HERMION DELALANDE FRIEDRICH 0. COQUIN G. PROBST 


Pour obtenir le serveur Echo, prenez votre téléphone habituel, 


composez le: (1) 48 67 62 25 et pressez la touche 
(CONNEXION/FIN) de votre minitel dès que vous entendez 
la porteuse (c'est comme le 3615, seul le numéro de 
téléphone change). 


Pour laisser un message à l’un des destinataires, ci-dessus 
mentionnés, choisissez l'option (3) et tapez son nom: 
exemple P, HUBER (ENVOI). 


SCRIVENER LE HIT DU CLUB : 


Fourni gratuitement à chaque membre du Club, SCRIVENER 
permet de réaliser des calculs dans un texte saisis sous 
Locoscript. Il faut noter que le bulletin n°2 propose deux 


d'elles, 


- Disposeront d'un centre serveur à prix réduit, 

- Recevront gratuitement le bulletin du Club de l'Echo du 
PCW qu'elles auront la charge de dupliquer et transmettre 
aux membres inscrits auprès d'elles, 

- Bénéficieront (ainsi que les personnes inscrites auprès 
d'elles) des avantages offerts aux membres du Club de 


l'Echo du PCW. 


Notez que les adresses des antennes locales seront publiées 
dans l'Echo et inscrites en lettres d'or sur le serveur Echo 
(près de 100 appels par jours !). 


Le succès des antennes est donc assuré et toute idée est 


exemples d'applications avec SCRIVENER. La première Drenvenus: 

application est le calcul d'un coefficient de corrélation d'une A bientôt, M Patrick HUBER, 

population, la seconde représente un exemple d'une facture Responsable CLUB ECHO DU PCW 
L'ECHO DU PCW N°7 47 . LE CLUB 


Suite de 


la page 17 | 19 REN RRRREEEEREAREIEENERS 


REM + TRANS-LOCASC V 2,0 + 
REM* MADE BY MARC HERMION + 
REM* POUR L'ECHO OU PCW à 
REN RARRRARRRERIRANNNNENENE 
60 CLEAR:VIDTH 255:D1M ASC16):FINS=CHRS(13)4CHRSC10) :CLSS=CHRS(27)4"E "4 
CHRSC27)4"H" :PRINT CLSS 
70 TS=CHRS(245)4CHRS(238)4CHRS(234)4CHR8C166 )4CHRS(235)4CHRS (225 )4CHRSC 
178)4CHR8C162)+"ç0a8èé"" 
80 FOR 121 T0 16:READ A:ASCI)=CHRSCA):NEXT 
90 ON ERROR GOTO 218:PRINT:PRINT: INPUT "NOM DU FICHIER DE DEPART" :AS:1F 
FINDS(AS)2"" THEN PRINT CLS$AS" EST INCONNU SUR CE LECTEUR, .":PRINT:6 
OT0 190 
190 INPUT “NOM DU FICHIER D'ARRIVEE" :B$ 
116 PRINT:OPEN "1", 1,A$:0PEN "O",2,88 
128 VHILE NOT EOF(1) 
136 LINE INPUT #1,AS:60SUB 16:PRINT #2,B8::1F L255 THEN PRINT 42,FINS 
PRINT FINS: 
140 VEND 
150 PRINT:PRINT "FINITO SUBITO PRESTO!! 1" :CLOSE :END 
160 B#="":LELENCASD:FOR 121 TO L:C=NIDSCAS, 1, 1):J=INSTRC1, T$,C8) 
176 IF JC)0 THEN CS=A$(J) 
180 BS=BS4C#:PRINT C: :NEXT:RETURN 
190 IF MIDSCAS,2,1)=":" THEN DS=LEFTSCAS,2) OPTION FILES DS 
200 DIR 
210 RESUME 99 


220 DATA 92,124,64,93,125,123,126,91,245,238,234,166,235,225,178,162 
Figure 2 


Son utilisation est simple : Entrez le nom du fichier à remettre en état et le nom du 
fichier devant contenir le texte réparé. 


L'autre nouveauté de LOCASC concerne le contrôle de présence d'un fichier sur 
le disque qui dans un cas négatif se solde par l'affichage du directory (répertoire 
de la disquette) obtenu par l'emploi de DIR qui ne supporte aucune autre instruction 
placée après lui. DIR comme toutes les stars a bien le droit à quelques caprices ! 


BH MARC HERMION 





riers vous dira comment. Pour ce 
qui concerne vos problèmes avec 
DISCKIT, il semble que vous ten- 
tiez de reproduire des logiciels 
ayant fait l’objet d'une protection 
de la part de l'éditeur. Donc, pas 


LES PCWISTES ECRIVENT.. 


Mr MORAGUES ARMAND 
33 GRADIGNAN 


Pouvez-vous me dire comment 





copier les logiciels du commerce à 
l'aide du programme DISCKIT qui 
ne veut pas toujours fonctionner. 
Est-ce possible avec PIP ? 


L'ECHO 


PIP peut vous aider dans des cas 
bien précis et un regard à nos cour- 


L'ECHO DU PCW N°7 48 


de copie autrement que par son 
intermédiaire. 


Mr STEINMETZ DANIEL 
95 ST-GRATIEN 


Je souhaiterais savoir comment 
doit-on écrire un programme pour 


COURRIER 


que celui-ci soit chargé automati- 
quement en mémoire à la mise 
sous tension de la machine, mais 
sans avoir à charger CP/M (de la 
même façon que BATMAN). 


L'ECHO 


Le PCW contient une petite ROM 
de quelques centaines d'octets 
dont la principale mission est de 
charger le système d'exploitation 
qui gère la totalité du système. La 
solution de votre requête consiste 
à réécrire un système d'’exploita- 
tion qui gèrera les périphériques 
nécessaires à votre application. 
Vous devrez l'écrire en langage 
machine et après quelques mois de 
travail vous découvrirez peut-être 
avec plaisir que PROFILE.SUB peut 
aussi lancer une application 
automatiquement ! 


Mr GONZALES CHRISTIAN 
13 ROGNAC 


C'est en me promenant dans 
l'EXBASIC que je me suis pris, par 
hasard, les roues dans un filet. 
Après les stupeurs des premiers 
instants passées, je me suis 
aperçu que j'avais eu peur d’un 
presque papillon. Le cœur sous la 
main, je me suis empressé de le 
sauver. J'espère que c'est le début 
d'une collection, vous pouvez gar- 
der i’aiguille et le bouchon si vous 
décidez de l'exposer. 

Je vous adresse mes amitiés. 
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ROTATE 






- Permet l'impression Verticale et horizontale €n 4 fontes 
différentes, 

- Compatible avec MULTIP. BASE 2, LOCo 
WORDSTAR 






* TASWORD et tout autre Programme pou- 
Vant générer des fichiers ASCII. 










- Paramétrage Possible de l'interligne, de l'espacement 
des Caractères et Choix du mode feuille à feuille ou 
Continu. 
+ Fonctionne avec toute imprimante Parallèle Connectée 
Sur l'interface INICS. 
- Menu Clair, entièrement en français, Offrant une grande 
Souplesse d'utilisation. 






- Livré avec un Manuel Complet et détaillé de toutes les 
Possibilités dy Programme, 
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La documentation complète ainsi que la liste des revendeurs agréés D.D.1 . 
vous seront immédiatement et gracieusement envoyées sur simple eppe ET 
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